---

Hej
Hvordan kan jeg via min formular med radioknapper sende null til
min access database, hvis folk ikke svarer på spørgsmålene
Access står som tekstfelter.
Jeg har prøvet følgende, men det virker ikke

Min modtager asp ser ud som følgende og jeg får følende
fejlmeddelse.



****Modtager spøg.asp******
dim tempValue

strSQL = "Insert into svar ("
For i = 1 to 2
strSQL = strSQL & "Svar" & i &", "
Next
strSQL = strSQL & "svar3)"


strSQL = strSQL & "values( "
For i = 1 to 2
tempValue = request.form(i)
if tempValue="" then
tempValue = null
end if

strSQL = strSQL & "'" & tempValue & "', "
Next

strSQL = strSQL & "'" & Request.Form(3) & "') "
Conn.Execute(strSQL)



Conn.Close
Set Conn = Nothing


******Fejlmeddelse************
Request-objekt fejl 'ASP 0105 : 80004005'

Indekset er uden for det gyldige område

/Und/modtag.asp, linje 31

Et matrixindeks ligger uden for det gyldige område.



ps hvordan får jeg svar 3 med som en evt null værdi

Hilsen John


--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

John Hertz skrev:

> strSQL = strSQL & "values( "
> For i = 1 to 2
> tempValue = request.form(i)

Parameteren til Request.Form skal være en streng. Det er dog muligt at
asp-parseren selv konverterer her - men hvis det er denne linje der
fejler, så prøv med Request.Form(Cstr(i))

> if tempValue="" then
> tempValue = null
> end if

Der er forskel på Null i asp-sammenhæng og Null i databasesammenhæng.
Hvis du vil angive værdien Null til databasen via en sql-sætning, skal
du i asp bruge strengværdien "NULL" (tempValue = "Null") - tricket er
bare at der ikke skal anførselstegn om værdien.

Du kan fx lave en funktion der sætter anførselstegn hvis der er en værdi
og ellers returnerer Null:

Function prepSQLVal(strData)
   If strData & "" = "" Then
      prepSQLVal = "NULL"
   Else
      prepSQLVal = "'" & Replace(strData, "'", "''") & "'"
   End If
End Function


> strSQL = strSQL & "'" & Request.Form(3) & "') "

Her skal der nok stå Request.Form("3") i stedet.


> /Und/modtag.asp, linje 31

Hvilken linje er nr. 31? (husk altid at angive hvor den fejlramte linje
er)

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Hej

Jens GyldenkærneClausen skrev
>Her skal der nok stå Request.Form("3") i stedet. <

Jo tak, det løste mit problem med feljmeddelse

Men jeg har stadigvæk ikke fundet ud af hvordan jeg
via min formular med radioknapper kan sende null til
min access database, hvis folk ikke svarer på spørgsmålene

Forslaget med Funktionen kan jeg ikke finde ud af at sætte ind i min kode
uden at jeg får en fejlmeddelse
Hvordan skal den sættes ind? Jeg har prøvet at sætte den ind forskellige
steder men uden held

Min kode ser nu ud som følger:


strSQL = "Insert into svar ("
For i = 1 to 2
strSQL = strSQL & "Svar" & i &", "
Next
strSQL = strSQL & "svar3)"


strSQL = strSQL & "values( "
For i = 1 to 2
tempValue = request.form(Cstr(i))
if tempValue="" then
tempValue = null
end if
strSQL = strSQL & "'" & tempValue & "', "
Next
strSQL = strSQL & "'" & Request.Form("3") & "') "



Hilsen John

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials