<%@ LANGUAGE="VBSCRIPT" %> Net@King ゲストブック <% fGuestLog = "c:\InetPub\NASP\guest\netking.txt" Set objFile = Server.CreateObject("Scripting.FileSystemObject") Set stmIn = objFile.OpenTextFile(fGuestLog, 1, False, False) sData = stmIn.ReadAll Set stmIn = Nothing Set objFile = Nothing %>

Net@King ゲストブック

<% = sData %>

<% = Len(sData) %>

戻る