Różne pożyteczne skrypty (bat, cmd, vbs), które niejednokrotnie wykorzytuję w swojej pracy zawodowej aby ułatwić sobie życie… bo czasem leniwy jestem: w.

ASP - FileSystemObject Witam, csv="plik.csv" set fs = createobject("Scripting.FileSystemObject") set f = fs.opentextfile(server.mappath(csv)) while not f.atEndOfStream     line = split(fs.readline, ",") - tu się wywala Microsoft VBScript - błąd czasu wykonywania (0x800A01B6) Obiekt nie obsługuje tej właściwości lub metody.: 'readli filesystem w ASP - otwarcie pliku lokalnego Witam mam sobie kawałek skryptu: <% Set fs=Server.CreateObject("Scripting.FileSystemObject") Set f=fs.OpenTextFile(Server.MapPath("plik.txt"), , 1) do while f.AtEndOfStream = false Response.Write(f.ReadLine) Response.Write("<br>") loop f.Close Set f=Nothing Set fs=Nothing %> i działa naprawdę pięknie.. wyrz filesystem w ASP - otwarcie pliku lokalnego Witam
mam sobie kawałek skryptu:
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject ")
Set f=fs.OpenTextFile(Server.MapPath("plik.txt"), , 1)

do while f.AtEndOfStream = false
Response.Write(f.ReadLine)
Response.Write("<br")
loop

f.Close
Set f=Nothing
Set fs=Nothing
%
Producent: Sanplast
Producent: RCM Pelikan
Producent: Zamel
Producent: Zamel
Producent: Only & Sons
Producent: ASP