Hallo,
nachdem ich mir die gesammelten Werke des Archivs heruntergeladen und fast vollständig durch gelesen habe, bleibt mir nichts anderes übrig, als die Frage hier ins Forum zustellen damit man mir vielleicht helfen kann.
Hier das kurze CodeFragment:
<%
Set MSWord = Server.CreateObject("Word.Basic")
MSWord.AppShow
MSWord.FileNew
MSWord.Insert("Startnummer: " & Startnummer & vbCRLF)
MSWord.Insert("Bewertung: " & Bewertung & vbCRLF)
MSWord.Insert("Formwertnote: " & Sieg & vbCRLF)
MSWord.Insert("JugendCAC: " & JCAC & vbCRLF)
MSWord.Insert("Dt.Ch.: " & AnwDtCh & vbCRLF)
MSWord.Insert("CAC: " & CAC & vbCRLF)
MSWord.Insert("Bester Rüde/Hündin: " & BestRuede & vbCRLF)
MSWord.Insert("BOB: " & BOB & vbCRLF)
MSWord.Insert("BIS: " & BIS & vbCRLF)
MSWord.Insert("Verbanssieger: " & VBSG & vbCRLF)
MSWord.Insert("JugendVerbandssieger: " & VBJSG & vbCRLF)
MSWord.FileSaveAs("d:\temp.doc")
' MSWord.FilePrint
MSWord.AppClose
Set MSWord = Nothing
%>
Mit der auskommentierten Zeile erhalte ich immer die Fehlermeldung:
Kein Drucker instaliert
aber es ist ein Drucker installiert, und sogar im Netz freigegeben.
Ich hoffe es kann mir jemand helfen
Gruß
Kai