<% AddrFilename = Server.MapPath ("/chegi/homepage/û³â¼º°¡´ë/") + "\addr.txt" Set FileObject = Server.CreateObject("Scripting.FileSystemObject") Set Out= FileObject.OpenTextFile (AddrFilename, 1, FALSE, FALSE) AllRead = Out.ReadAll AllReadS = Split(AllRead, vbLf) For i = 0 to Ubound(AllReadS) Response.Write "" LineRead = AllReadS(i) LineReadS = split(LineRead,",") For j = 0 to Ubound(LineReadS) Response.Write "" Next Response.Write "" Next%>
" Response.Write LineReadS(j) Response.Write "