Vi incollo il default.asp e il write.asp di un guestbook che sto implementando.
Dopo aver inserito qualcosa nel form del default.asp, mi dice "Errore 500" e non trova la pagina write.asp (almeno, questo è il messaggio che mi dice).
Il file di testo su cui deve scrivere è un file di una sola riga, vuota, che si chiama guest.txt dentro la cartella cgi-bin
Grazie!!
default.asp
<HTML><BODY BGCOLOR="#FFFFFF" TEXT="#000000">
<FORM METHOD="POST" ACTION="http://www.gimeil.com/A835/write.asp">
<INPUT NAME="new_line" TYPE="TEXT" SIZE=35>
<INPUT TYPE="SUBMIT" VALUE="Invia">
</FORM>
<%
MyFile = "http://www.gimeil.com/cgi-bin/guest.txt"
Set MyFileObj=Server.CreateObject("Scripting.FileSyste mObject")
IF MyFileObj.FileExists(MyFile) THEN
Set MyTextFile=MyFileObj.OpenTextFile(MyFile)
WHILE NOT MyTextFile.AtEndOfStream
%>
<HR>
<%=MyTextFile.ReadLine%>
</HR>
<%
WEND
MyTextFile.Close
END IF' Does file exist
%>
<HR>
</BODY>
</HTML>
write.asp <%
MyFile = "http://www.gimeil.com/cgi-bin/guest.txt"
Set MyFileObj=Server.CreateObject("Scripting.FileSyste mObject")
Set MyOutStream=MyFileObj.OpenTextFile(MyFile, 8, TRUE)
New_line = Request.Form("new_line")
New_line = Server.HTMLEncode(New_line)
'Adds the time and date it was posted
New_line = "Posted: " & NOW & "
" & New_line
MyOutStream.WriteLine(New_line)
MyOutStream.Close
Response.Redirect "\A835\default.asp"
%>
Rispondi quotando
