Response.Redirect kan inte komma efter att man matat ut saker. Sätt Response.Buffer=true överst, så borde det lösa sig.
Frågan#1
Hej har just flyttat sidan fån Brinkster -> Aleborg
Jag bara ändrade i
- send knappen
- addressen i response redirect
Så får jag detta mess:
Response object error 'ASP 0156 : 80004005'
Header Error
/skriv.asp, line 106
The HTTP headers are already written to the client browser. Any HTTP header modifications must be made before writing page content.
Inlägget visas ändå i databasen
please help me...
%
namn = trim(Request.Form("namn"))
Epost = trim(Request.Form("mail"))
Message = trim(Request.Form("message"))
if namn = "" or Epost = "" or Message = "" then
if request.form("skriv") <> "" then response.write "Du måste fylla i alla fält<br>"
%><script type="text/javascript">
var cPos,
fObj,
ieC = Boolean(document.selection && document.selection.createRange);
function smilie(str) {
if (ieC) {
if (typeof cPos != "undefined")
cPos.text = str;
else
fObj.value = str;
}
else if (typeof window.HTMLTextAreaElement != "undefined")
fObj.value = fObj.value.substring(0, fObj.selectionStart) + str + fObj.value.substring(fObj.selectionEnd);
else fObj.value += str;
}
function sC() {
cPos = document.selection.createRange().duplicate();
}
window.onload = function() {
fObj = document.forms["skriv"].elements["message"];
if (ieC) {
fObj.onclick = function() { sC(); }
fObj.onkeyup = function() { sC(); }
fObj.onselect = function() { sC(); }
}
}
</script>
<table width="710" border="1" align="center" bordercolor="#FFFFFF" bgcolor="#0000FF">
<tr>
<td><form name="skriv" method="post" action="skriv.asp?cmd=Send">
<p><br>
<span class="style2">Namn:</span><br>
<input type="text" name="namn" size="50" value="<%=Server.htmlencode(namn)%>">
<span class="style2">Smilisar:</span>
<a href="#" onClick="smilie(':)'); return false;"><img src="images/smiley/smile.GIF" alt="leende" width="15" height="15" border="0"></a> <a href="#" onClick="smilie(':('); return false;"><img src="images/smiley/frown.GIF" alt="ledsen" border="0"></a> <a href="#" onClick="smilie(':e'); return false;"><img src="images/smiley/supergrin.GIF" alt="stort flin" width="15" height="15" border="0"></a> <a href="#" onClick="smilie(';)'); return false;"><img src="images/smiley/wink.GIF" alt="glimten i ögat " width="15" height="15" border="0"></a> <a href="#" onClick="smilie(':p'); return false;"><img src="images/smiley/tongue.GIF" alt="retsam" width="15" height="15" border="0"></a> <a href="#" onClick="smilie(':h'); return false;"><img src="images/smiley/cool.GIF" alt="cool kille" width="15" height="15" border="0"></a></p>
<P align="right"><a href="#" onClick="smilie(':OO'); return false;"><img src="images/smiley/look.GIF" alt="funderande" border="0"></a> <a href="#" onClick="smilie('x('); return false;"><img src="images/smiley/angry.GIF" alt="arg" border="0"></a> <a href="#" onClick="smilie(':o'); return false;"><img src="images/smiley/redface.GIF" alt="förvånad" width="15" height="15" border="0"></a> <a href="#" onClick="smilie(':q'); return false;"><img src="images/smiley/quest.GIF" alt="frågande" border="0"></a> <a href="#" onClick="smilie(':D'); return false;"><img src="images/smiley/biggrin.GIF" alt="väldigt glad" width="15" height="15" border="0"></a> <a href="#" onClick="smilie(':P'); return false;"><img src="images/smiley/blah.GIF" alt="busig" width="17" height="17" border="0"></a>
<P align="right"><a href="#" onClick="smilie('§jr'); return false;"><img src="images/smiley/devel.GIF" alt="små jävlig" width="15" height="15" border="0"></a> <a href="#" onClick="smilie('§e'); return false;"><img src="images/smiley/devilgrin.GIF" alt="jävlig" width="20" height="19" border="0"></a> <a href="#" onClick="smilie(':l'); return false;"><img src="images/smiley/hrmpf.GIF" alt="skeptisk" width="15" height="15" border="0"></a> <a href="#" onClick="smilie(':i'); return false;"><img src="images/smiley/idea.GIF" alt="idé" width="20" height="15" border="0"></a> <a href="#" onClick="smilie(':D'); return false;"><img src="images/smiley/stud.GIF" alt="läs på" width="22" height="17" border="0"></a> <a href="#" onClick="smilie(':L'); return false;"><img src="images/smiley/laugh.GIF" alt="skrattar" width="15" height="15" border="0"></a>
<P align="center"> <a href="#" onClick="smilie(':bla'); return false;"><img src="images/smiley/jaja.GIF" alt="blä" width="15" height="15" border="0"></a> <a href="#" onClick="smilie('(y)'); return false;"><img src="images/smiley/icon7.GIF" alt="tummen upp" width="16" height="16" border="0"></a> <a href="#" onClick="smilie('(n)'); return false;"><img src="images/smiley/icon6.GIF" alt="tummen ner" width="16" height="16" border="0"></a>
<p><span class="style2">E-post</span><br>
<input type="text" name="mail" size="50" value="<%=Server.htmlencode(Epost)%>">
</p>
<p><span class="style2">Meddelande:</span><br>
<textarea name="message" cols="70" rows="10" wrap="virtual"><%=Server.htmlencode(Message)%></textarea>
<p align="right">
<input type="submit" name="skriv" value="Lägg till">
</form> </td>
</tr>
</table>
<%
end if
if namn <> "" and Epost <> "" and Message <> "" then
Set gbok = Server.CreateObject( "Adodb.Connection" )
gbok.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath("../data/guests.mdb")
gbok.ConnectionString = "Data Source='" & MdbFilePath & "'"
gbok.open
strSQL = "INSERT INTO guestbook(namn, Epost, Message, Datum) VALUES('" & namn & "','" & Epost & "','" & Message & "','" & now() & "')"
gbok.Execute( strSQL )
Set gbok = Nothing
Response.Redirect "gbok.asp"
End If
%>