Hejsan!
Vill hämta det värde man matat in från databasen.

<code>
info = Request.Form("antal")
SQLbesk = "SELECT funktionid FROM Funktion = " & info
Response.Write "Du valde info knapp" & SQLbesk & "!"
</code>

Vill alltså jämföra info med funktionid i databasen så att man skriver ut rätt. Som jag skriver nu så får jag en utskift:

Du valde info knapp SELECT funktionid FROM Funktion=2!
Vad göra???

/Caroline

Är det ett tal eller ett namn avändaren matar in?

Om det är ett tal som matas in och skall jämföras mot funktionid och slå upp Funktion:
<code>
Dim rs
Dim con

Dim info

info = "" & Request.Form("antal")
If IsNumeric(info) Then
Set con = Server.CreateObject("ADODB.Connection")
con.Open ">>>Din anslutningssträng<<<"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT Funktion FROM funktionid = " & CLng(info), con

If rs.EOF Then
Response.Write "Det finns ingen knapp med funktionid " & info & "!"
Else
Response.Write "Du valde info knapp " & rs("Funktion") & "!"
End If
Else
Response.Write "Du har inte angivit ett tal för funktionid!"
End If
</code>

Om det är funktionid och slå upp från namnet/strängen Funktion
<code>
Dim rs
Dim con

Dim info

info = "" & Request.Form("antal")
If Len(info) > 0 Then
Set con = Server.CreateObject("ADODB.Connection")
con.Open ">>>Din anslutningssträng<<<"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT FunktionId FROM Funktion = '" & Replace(info, "'", "''") & "'", con

If rs.EOF Then
Response.Write "Det finns ingen knapp med funktion " & Server.HTMLEncode(info) & "!"
Else
Response.Write "Du valde info knapp " & rs("FunktionId") & "!"
End If
Else
Response.Write "Du har inte angivit ett värde!"
End If
</code>

Ta dig i kragen nu "CARRO". Du har ju läst en databaskurs med jeppe the man.
Detta ska du ju kunna

Mvh

Gissa vem?