<% FilePath=Server.MapPath("connect.txt") Set ObjFile=Server.CreateObject("Scripting.FileSystemObject") Set ObjStream=ObjFile.OpenTextFile(FilePath,1,False,False) Response.Write ObjStream.ReadALL&"
" %>