> Poradte pls nekdo, jakej objekt je ve scriptech WSH pro praci
> s textovymi soubory.
A nestaci ti na to normalne FileSystemObject?
Tohle ti precte soubor autoexec.bat a prvnich 100 znaku
zobrazi v dialogu po 20ti.
' ---------------------------------------------
Dim FileData, Fso, Data, i, Radek
Set Fso = CreateObject("Scripting.FileSystemObject")
Set FileData = Fso.OpenTextFile("C:\autoexec.bat")
Data = FileData.ReadAll
FileData.Close
For i = 1 To Len(Data) step 20
if i > 100 then exit for
Radek = Mid(Data, i, 20)
MsgBox Radek
Next
' ---------------------------------------------
BTW urcite to jde jednoduseji.... ;o)
> Jeste jedna vec. nedavno tady probihala diskuse na tema OE
> a jeho ovladani ze scriptu, ale nejak jsem nepostrehnul,
> jak to dopadlo. tedy LZE nebo NELZE
Obavam se, ze to nelze :(
Dokonce jsem si stahnul i zdrojak k viru i love you, rozpitval
ho, ale bez vysledku. Bez velkyho otlaku to nejspis nejde :(
Coz je mi divny, protoze si myslim, ze se siril i pomoci OE.
V tom zdrojaku je ale videt, ze si to tahalo nejakej exe
soubor z netu, mozna to zabezpecoval on, nevim...
Tohle je to, co rozesilalo emaily:
' ---------------------------------------------
set out=WScript.CreateObject("Outlook.Application")
set male=out.CreateItem(0)
male.Recipients.Add("tvuj_mail@nekde.cz")
male.Subject = "vbs - test"
male.Body = vbcrlf&"bubaci jdou"
male.Send
' ---------------------------------------------
BTW nevim co je to vbcrlf. Mozna jen nejaka promenna,
nejspis enter (cr+lf).
Jinak na me samozrejme krici, ze nemuze lokalizovat
Outlook.Application. Taky nema kde, mam jen OE.
> s WSH zacinam, tak doufam, ze guru WSH prominou,
> pokud se jim to zda jako malickost :)
Obavam se, ze tu moc WSH guru nenajdes...
Maximalne tak AleXXX, guru pres veskere scripty
v M$ produktech ;o)
Ale zkus prostudovat dokumentaci, mozna uspejes.
Offline verze se da stahnout tady, ma to cca 1,5mb:
http://download.microsoft.com/download/winscript56/Install/5.6/W982KMeXP/EN-US/scrdoc56en.exe
-pp21-
This archive was generated by hypermail 2.1.2 : 07. 03. 2002, 10:33 CET