G Gimbo Medlem sedan dec. 2000 1 626 inlägg Frågan 14 apr. 2002 15:10 #1 Jag får detta felmeddelande när jag ska försöka skriva ngt till databasen:
Körningsfel i Microsoft VBScript fel '800a000d'
Inkompatibla typer
<%If Request.QueryString("action") = "skicka" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
Namn = Request.Form("namn")
Email = Request.Form("email")
Bild = Request.Form("bild")
Fraga = Request.Form("fraga")
Rubrik = Request.Form("rubrik")
Info = Request.Form("info")
SQL = "Insert Into galleri(namn,email,bild,fraga,rubrik,Info) Values('" & Namn & "','" & Email & "','" & Bild & "'," & Fraga & ",'" & Rubrik & "','" & Info & "')"
Conn.Execute(SQL)
Session("mess") = "Din bild hamnar på sidan snarast möjligast
Response.Redirect "index.asp"
End If
Else
Session("mess") = "Ladda upp en bild först!!!"
Response.Redirect "laddaupp.asp"
End If
%>
RED: Läste lite för fort.
Ahh, nu ser jag. Du avslutar If-satsen och sedan gör du en Else precis efter. Alltså du har 2 st End If men bara en If.
G Gimbo Medlem sedan dec. 2000 1 626 inlägg jag försökta att ta bort en av de men det fungerade inte, kan det va så att jag har en kolumn som heter rosta i databasen som jag inte lägger ngn post i, att det e den som spökar?? jag har satt den datatypen till tal och värdet på den 0, dvs det är en röstningsfunktion...
Vad får du ut på skärmen av denna koden?
<%If Request.QueryString("action") = "skicka" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
Namn = Request.Form("namn")
Email = Request.Form("email")
Bild = Request.Form("bild")
Fraga = Request.Form("fraga")
Rubrik = Request.Form("rubrik")
Info = Request.Form("info")
SQL = "Insert Into galleri(namn,email,bild,fraga,rubrik,Info) Values('" & Namn & "','" & Email & "','" & Bild & "'," & Fraga & ",'" & Rubrik & "','" & Info & "')"
response.write SQL
'Conn.Execute(SQL)
Session("mess") = "Din bild hamnar på sidan snarast möjligast
'Response.Redirect "index.asp"
Else
Session("mess") = "Ladda upp en bild först!!!"
'Response.Redirect "laddaupp.asp"
End If
%>
G Gimbo Medlem sedan dec. 2000 1 626 inlägg Jag får upp det angivna felmeddelandet, men jag har kommit problemet än mernärmare, när jag tar bort Info, från hela den sattsen dvs att den inte läses in i variabeln Info och inte skriver den till databasen så får jag inga felmeddeanden och koden fungerar fin fint.
Kan det vara ngt med att info är en textarea??
så här ser info formuläret ut:
<textarea name="info" cols="40" rows="10"></textarea>
så fort jag tar bort allt som har med info att göra så fungerar scriptet perfekt, men när jag lägger till det så får jag det angivna felmeddelandet...
Du måste fått ut utskriften av SQL-frågan också. Så länge du inte delger den kan jag tyvärr inte hjälpa dig.
G Gimbo Medlem sedan dec. 2000 1 626 inlägg Vad menar du med utskriften av SQL sattsen??? alltså det enda jag får är det felmeddelandet under själv formuläret som jag fyller i när jag ska skriva till databasen, jag skriver nämligen till databasen via ett formulär...
Vill du att jag bara ska köra asp koden för skrivningen till databasen, dvs den koden utan ngt formulär??
L LarsG Medlem sedan dec. 2000 12 464 inlägg Vilken rad får du fel på?
Felet ligger i skriptet och inte i sql-frågan.
Skriv i datan i formuläret och tryck på knappen så du kommer till sidan som kör ovanstående kod. Då ska du få en utskift på din SQL-fråga.
G Gimbo Medlem sedan dec. 2000 1 626 inlägg Alltså felmeddelandet jag får är detta:
Körningsfel i Microsoft VBScript fel '800a000d'
Inkompatibla typer
/tavling/skicka.asp, rad 140
Och felet ligger i det där med info för när jag tar bort det så fungerar scruiptet, vart kan felet ligga??
G Gimbo Medlem sedan dec. 2000 1 626 inlägg jag sa fel felet är här, rad 140 är denna:
Info = Request.Form("info")
den raden är 140
L LarsG Medlem sedan dec. 2000 12 464 inlägg Oki doki. Hur är info i definierat i ditt formulär?
G Gimbo Medlem sedan dec. 2000 1 626 inlägg <textarea name="info" cols="40" rows="10"></textarea>
G Gimbo Medlem sedan dec. 2000 1 626 inlägg ingen som kan hjälpa mig??
@nders Medlem sedan juni 2000 32 967 inlägg Prova:
Info = "" & Request.Form("info")
Mvh,
G Gimbo Medlem sedan dec. 2000 1 626 inlägg nope jag får fortfarande samma felmeddelande, kan det inte vara textarean som spökar??
@nders Medlem sedan juni 2000 32 967 inlägg Vete 17. Har du provat att byta namn på textarean? Det ser ju faktiskt helt rätt ut...
Jag kan inte förstå vad problemet är.
Mvh,