:D:D.. Eccoti risolto il problemino, anche se non ti ho dato la soluzione pura al 100%.. 😉 voglio dire che ho messo un pò di mio e quindi anche tu puoi mettere un pò di tuo, ma siccome le cattiverie non hanno senso ti evidenzio in azzurro quello che dovresti cambiare per far si che non ti beccano… ok???
A questo punto devi semplicemente editare lo script e poi evidentemente lo mandi in esecuzione…
ah…. un’altra cosa…. :D:D…  ma questa però non la evidenzio…. dopo che apri il file, ti apparirà un messaggino dove ti dice che il file editato con word è stato salvato nella directory di C:\Esempio Con Word.doc
Eccoti il codice:
Dim wApp, wDoc, wRange, sName, sDate, sTime
Set wApp = CreateObject(“Word.Application”)
Set wDoc = wApp.Documents.Add
Set wRange = wDoc.Range
sName = “giovannidimauro.altervista.org”
sDate = Date()
sTime = Time()
sContent = “Documento creato da ” & sName & ” alle ore ” & sTime & ” in data ” & sDate & “!”
wRange.Style = -3
wRange.Font.Color = 255
wRange.Text = sContent
wDoc.SaveAs “C:Esempio Con Word.doc”
wApp.Quit
Set sRange = Nothing
Set wDoc = Nothing
Set wApp = Nothing
WScript.Echo “Il file è stato appena salvato nella seguente directory C:Esempio Con Word.doc”
Vota...