4 svar · 259 visningar · startad av Boorg
Denna verkar lite primitiv, Finns det något enklare sätt o skriva denna.
JobNo = Request.QueryString("JobNo")
Sql = "SELECT * FROM _Portal_projekt_tidplan"
rs.open sql, con
strJobNo = "ej"
Do until rs.EOF
If rs("JobNo") = JobNo Then
strJobNo = "jo"
End If
rs.Movenext
loop
rs.close
If strJobNo = "ej" Then
Response.Redirect "new.asp?JobNo=" & JobNo
End If
Mvh Jesper
JobNo = replace(Request.QueryString("JobNo"), "'", "''")
Sql = "SELECT * FROM _Portal_projekt_tidplan where JobNo=" & JobNo
rs.open sql, con
if not rs.eof then
strJobNo = "jo"
else
strJobNo = "ej"
end if
rs.close
If strJobNo = "ej" Then Response.Redirect "new.asp?JobNo=" & JobNo
(Jag har utgått från att fältet JobNo är numeriskt i tabellen.)
En variant:
[red]JobNo = Replace(Request.QueryString("JobNo"), "'", "''")
bolRedirect = false
Set rs = con.Execute("SELECT JobNo FROM _Portal_projekt_tidplan WHERE JobNo = "& jobNo)
If NOT rs.EOF Then
bolRedirect = false
Else
bolRedirect = true
End If
rs.Close
Set rs = Nothing
If bolRedirect = true Then Response.Redirect "new.asp?JobNo=" & JobNo[/red]
r:/ mmm.. så slö man är då. ;)
Man måste se till så inte eventuella apostrofer förstör SQL-frågan. Om inte jobno är numeriskt i tabellen:
Sql = "SELECT * FROM _Portal_projekt_tidplan where JobNo='" & JobNo & "'"