Re: Textfile im Ordner "eigene Dateien" erzeugen

hallo roland,
herzlichen dank für das script. es funzt prima....

gruss rudi

"Roland Weisskopf" <abuseeaglemaster-0706@xxxxxxxx> schrieb im Newsbeitrag
news:%23bcwf4L3FHA.3292@xxxxxxxxxxxxxxxxxxxxxxx
> Rudi Palmers posted the following on 28.10.2005 23:33:
>
> Hallo Rudi
>
>> ich möchte in einem Logon Script für einen Windows 2003 Terminalserver im
>> Ordner 'Eigene Dateien' des sich anmeldenden Benutzers eine Datei
>> erzeugen, welche sich aus dem Anmeldenamen und einem Timestamp
>> zusammensetzt. z.B:
>>
>> rpalm05102005.txt
>>
>> Kann mir jemand auf die Sprünge helfen.
>
> Im Zusammenhang mit TS ungetestet
>
> Set WshShell = WScript.CreateObject("WScript.Shell")
> Set objFileSystem = Wscript.CreateObject("Scripting.FileSystemObject")
> Set objNetWork=createobject("Wscript.Network")
> GetUsername = objNetwork.Username
> strOwnDir = WshShell.SpecialFolders("MyDocuments") & "\"
> strStampFile = GetUsername & cstr(day(now)) & cstr(month(now)) &
> cstr(year(now)) & ".txt"
> Set objStampFile = objFileSystem.CreateTextFile(strOwnDir & strStampFile,
> vbTrue)
> objStampFile.close
>
>
> Gruss
>
> Roland Weisskopf
>
> http://mypage.bluewin.ch/eaglesoft/


.

Loading