Hej Hej <% Problem med Querystring...
Jag har en länk:
">Redigera
När man klickar på denna länk så ska man ju kunna (i detta fall) redigera någonting. Men hur skriver jag denna korrekt:
som jag tycker att den borde se ut så här:
<% If Request.Querystring("val") = %> <% =RecSet("ID")%> <% Then %>
Kan någon hjälpa mig? Jag vet att om jag länkar till en ny sida så kan jag få det att fungera men om jag gör så här så går det inte, fast än det är det jag vill.
Jag har provat att skriva den på följande vis:
<% If Request.Querystring("val") = RecSet("ID") Then %>
men då kan den inte hitta "objektet som ska stämma överens med..."
Vem kan hjälpa mig med detta?
Tack på förhand!
/ErskeSv: Problem med Querystring...
>> <% If Request.Querystring("val") = RecSet("ID") Then %>
Det är helt klart denna variant du skall gå på
>> men då kan den inte hitta "objektet som ska stämma överens med..."
Kan du utveckla lite??Sv: Problem med Querystring...
Dim Conn
Dim RecSet
Dim strSQL
Dim vTemp
Dim vID
vTemp = Request.Querystring("val")
If IsNumeric(vTemp) Then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ">>>ConnectionString...<<<"
Set RecSet = Server.CreateObject("ADODB.Recordset")
vID = Val(vTemp)
strSQL = "SELECT * FROM >>>TableName<<< WHERE ID = " & vID
RecSet.Open strSQL, Conn
If RecSet.Bof Or RecSet.Eof
Response.Write "<H1>Post saknas </H1>"
Else
%>
<FORM id=FORM1 name=FORM1 action="" method=post>
Namn:<INPUT name=text1 value="<%=Replace(RecSet("Namn").Value,"""","""""")%>"><BR>
<INPUT type=reset value=Reset><INPUT type=submit value=Submit>
</FORM>
<%
End If
RecSet.Close
Set RecSet= Nothing
Conn.Close
Set Conn = Nothing
%>