Nå men jeg har fundet et script der kan omdanne et html-dokument til word, men jeg får fejl, mit script ser sådan ud:
<%
Option Explicit
HTML2Word "
file://" & Server.MapPath("test.htm"), Server.MapPath("test.doc")
Response.Write "Finnished at: " & Now()
Sub HTML2Word(ByRef pstrSourceURL, ByRef pstrTargetFile)
Dim lobjWordApp
Dim lobjInternetExplorer
Set lobjWordApp = Server.CreateObject("Word.Document")
Set lobjInternetExplorer = Server.CreateObject("InternetExplorer.Application")
lobjInternetExplorer.Navigate pstrSourceURL
IEStandBy lobjInternetExplorer
lobjInternetExplorer.document.body.createTextRange.execCommand("Copy")
IEStandBy lobjInternetExplorer
lobjWordApp.Content.Paste
lobjWordApp.SaveAs pstrTargetFile
lobjWordApp.Close
lobjInternetExplorer.Quit
Set lobjInternetExplorer = Nothing
Set lobjWordApp = Nothing
End Sub
Sub IEStandBy(ByRef pobjInternetExplorer)
' Not good (Pegs system resources)
' Need To find a way to "sleep"
While pobjInternetExplorer.busy:Wend
While Not pobjInternetExplorer.Document.readyState = "complete":Wend
End Sub
%>
jeg får denne fejl:'
Serverobjekt, ASP 0178 (0x80070005)
Kaldet til Server.CreateObject blev ikke udført under kontrol af tilladelser. Adgang til dette objekt er nægtet.
/html2word/default.asp, line 8
Linie 8 ser sådan ud:
Set lobjWordApp = Server.CreateObject("Word.Document")
men mon ikke jeg også vil få fejlen i linie 9 !
Nogen der kan hjælpe ?