% dim fso,f1 Const ForReading = 1 set fso=createobject("Scripting.FileSystemObject") ''使用fso對象讀取信息。 set f1=fso.OpenTextFile("E:\doit\info2.txt", ForReading) ''打開要讀取的文件 dim conn,rst
set conn=server.createobject("adodb.connection") ''建立數據庫連接,執行操作 set rst=server.createobject("adodb.recordset")