<!-- #include file = "connect.asp" -->
<%
If Request.QueryString("doit") = "gbadd" Then
gbAlias = Session("user")
gbAliasId = Session("id")
gbMess = Request.Form("gbMess")
gbId = Request.QueryString("id")
gbDate = FormatDateTime(Now,2)
If len(gbMess)> 0 Then
Conn.execute("Insert into panda_gb (gbAlias,gbAliasId,gbMess,gbId,gbDate) Values('" & gbAlias & "','" & gbAliasId & "','" & gbMess & "','" & gbId & "','" & gbDate & "')")
response.redirect "default.asp?page=profile&id=" & Request.QueryString("id") & "&user=gb"
else
response.write "<script> alert('fel fel fel'); </script>"
End if
End if
%>
<% if Session("user") = "" THEN
Response.Redirect("default.asp")
else %>
<form method="post" action="gb.asp?doit=gbadd">
<textarea name="gbMess"></textarea>
<br>
<input name="submit2" type="submit" class="submit style14" value=" Skicka ">
</form>
<%
sql = "select * from panda_gb where gbId=" & request.QueryString("id")
Set rs = conn.execute(SQL)
while not rs.eof
Response.write Rs("gbAlias") & Rs("gbAliasId") & "<br>" & Rs("gbMess") & "<br><br>"
rs.movenext
wend
Rs.Close
end if
%>
problemet är att den inte visar det som finns i databasen längre (fast det finns saker i den)
sen undrar vad som är fel med
response.redirect "default.asp?page=profile&id=" & Request.QueryString("id") & "&user=gb"