Min strSQL skriver det herud, det er bare der er ikke nogen værdi i idnummer, hvad gør jeg forkert. Er det min måde at bygge min strSQL op der er forkert?
INSERT INTO forumsvar (idnummer,svar) VALUES ('','hej ')
Her opretter jeg min svarnr:
<td width = "200px"><a href="forum.asp?mode=vissvar&svarnr= <%=id%>">Username:<%=username%></a></td>
Her tester jeg om svarnr er forskellig fra tom og hvis laver den så den textarea:
If svarnr <> "" then
%>
<div id = "newforum">
<form method="POST" action="forum.asp" style="margin: 0px;">
<textarea rows="5" cols="22" name="forum"></textarea><br>
<input type="submit" value= "Tilføj" name="Action">
</form>
</div>
<%
End if
strTekst = Request.Form("forum")
strTekst = Replace(strTekst, "'", "''")
strTal = Request.Querystring("svarnr")
strTal = Replace(strTal, "'", "''")
If Request.Form("Action") = "Tilføj" then
'Database kontakt
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Mode = 3
DNS = "DRIVER={Microsoft Access Driver (*.mdb)};"
DNS = DNS & "DBQ=" & Server.Mappath("login_2000.mdb")
'Database åben
Conn.Open DNS
'strSQL = "INSERT INTO forumsvar ([idnummer],svar) VALUES ( "& strTal &" ,'" & strTekst & "')"
'strSQL = "INSERT INTO forumsvar (idnummer,svar) VALUES ('" & Request.QueryString("svarnr") & "', '"& strTekst & "')"
strSQL = "INSERT INTO forumsvar (idnummer,svar) VALUES ('"& strTAL &"','"& strTekst &"')"
Response.Write (strSQL)
End if
%>