Jag vill att varje gång en användare registrerar sig på en webbplats så ska en bekräftelse skapas i form av ett Word-dokument som sedan kan laddas ner, skrivas ut (av administratören alltså) och som man sedan kan skicka per vanlig post.

Informationen som ska läggas in i dokumentet ska placeras på speciella platser i dokumentmallen.

Hur gör man detta?

Hej!
Jag har också problem med word-objekt. Jag har endel kodsnuttar som jag testat, men jag får inte dem att fungera. Däremot har en person skrivit till mig, som testat koden och säger att den fungerar klockrent. Kanske är det fel på servern vi använder...
Skulle du vilja testa följande kod och berätta om de fungerar:
(du behöver bara kopiera dem, redigering behövs inte)

<%Dim MyDoc
Set MyDoc = CreateObject("Word.Document")
MyDoc.Application.Visible = True

MyDoc.content.Font.Bold = True
MyDoc.content.Font.Italic = True
MyDoc.content.Font.Underline = True
MyDoc.content.Font.Name = "Comic Sans MS"
MyDoc.content.Font.Size = 25
MyDoc.content.insertAfter "word1 word2 word3 word4"
MyDoc.content.InsertParagraphAfter
MyDoc.Words(1).Font.Size = 10
MyDoc.Words(1).Font.ColorIndex = 1
MyDoc.Words(2).Font.Size = 20
MyDoc.Words(2).Font.ColorIndex = 2
MyDoc.Words(3).Font.Size = 30
MyDoc.Words(3).Font.ColorIndex = 3
MyDoc.Words(4).Font.Size = 40
MyDoc.Words(4).Font.ColorIndex = 4
MyDoc.PrintOut
Set MyDoc = Nothing %>


Koden skapar ett worddokument, skriver i det, skriver ut det och stänger det utan att spara.
Jag får felmeddelandet: "objektet borttaget 800a16c1" (Den kommer till rad 3)

Följande kod kan du också testa:

<%Dim MyWord
Dim MyDoc
Set MyWord = CreateObject("Word.Application")
'MyWord.Visible = True
Set MyDoc = MyWord.Documents.Add()
With MyDoc.content
With .Font
.Name = "Comic Sans MS"
.Bold = True
.Italic = True
.Underline = True
.Size = 25
End With
.insertAfter "word1 word2 word3 word4"
.InsertParagraphAfter
End With
With MyDoc.Words(1).Font
.Size = 10
.ColorIndex = 1
End With
With MyDoc.Words(2).Font
.Size = 20
.ColorIndex = 2
End With
With MyDoc.Words(3).Font
.Size = 30
.ColorIndex = 3
End With
With MyDoc.Words(4).Font
.Size = 40
.ColorIndex = 4
End With
MyDoc.PrintOut
Set MyDoc = Nothing
Set MyWord = Nothing %>

Här får jag felmeddelandet: "Det gick inte att öppna makroverktyget. 0x800A1750" (Kommer till rad 5)

Hoppas koden fungerar för dig och att de kan vara till nytta!
(Du måste har word installerat på servern.)
Skriv tillbaka när du testat dom och berätta.
Kanske vet du även vad mina fel bero på...

/Diana

Har samma problem själv och jag vet inte hur jag ska lösa det, får inte upp word doc på vissa datorer jag testar på, och andra visar det - men inte som det ska vara, sedan är det helt OK i vissa datorer, vad kan det bero på? Någon som vet?????

Har med serverns rättigheter att skapa word-dokument, och lite trixigt att fixa. Men gör såhär på servern:
1. Kör först programmet dcomcnfg.exe
2. Under fliken Applications, markera Microsoft Word Document och klicka på Ok.
3. Klicka på Security-fliken.
4. Bocka i Use custom access permissions. Klicka Edit, och sen Add.
5. Lägg till användaren "Network". Klicka Ok.
6. Klicka Identity-fliken och bocka för The interactive user.
7. Klicka Ok, Ok.

Läs diskussion på IDGs forum:
http://eforum.idg.se/viewmsg.asp?EntriesId=264481