webForumDet fria alternativet

Vad kan vara fel här då???

ASP

16 svar · 250 visningar · startad av Dflex

Medlem sedan juni 2002136 inlägg
Frågan#1

Provider error '80020005'

Type mismatch.

/uddcomb/admin/savenewad.asp, line 38

Tack på förhand!

// Dflex

Medlem sedan juni 200032 967 inlägg
#2

Kod?

Medlem sedan juli 20012 450 inlägg
#3

Ja du...
Du får nog vara lite mer precisis...
tex, vad finns på rad 38, det skulle hjälpa ett par hekto. :)

Medlem sedan juli 2001458 inlägg
#4

Vad säger koden?

Medlem sedan juni 2002136 inlägg
#5

Här kommer koden!

Medlem sedan juli 20012 450 inlägg
#6

rs("innehåll")=innehall

Finns det verkligen ett fält databasen som heter "innehåll"?

Medlem sedan juni 2002136 inlägg
#7

Svar: ja

Medlem sedan juli 20012 450 inlägg
#8

Vad försöker du skriva till innehåll?

<%
innehall=request.form("innehall")
Response.Write innehall
%>

OT: undvik att använda svenska bokstäver när du kodar i asp, sql eller dylikt...

Medlem sedan juni 200032 967 inlägg
#9

Kontrollera så att värdena du försöker stoppa in är av rätt datatyp, så du inte försöker lägga in text i fält som är av taltyp, osv.

Dessutom, det är bättre om du klistrar in relevant kod här, det är omständigt att ladda hem, zippa upp och öppna en editor.

Mvh,

Medlem sedan juni 2002136 inlägg
#10

Innehåll är av typen PM.

Ok...i fortsättningen lägger jag ut relevant kod:)

Medlem sedan juli 20012 450 inlägg
#11

Vad händer om du byter till "Text"?

Medlem sedan juni 2002136 inlägg
#12

Testat det...men det blir samma felmeddelande!

Medlem sedan juli 20012 450 inlägg
#13

Prova denna istället... Man vet ju aldrig...

SQLStr="INSERT tbl_Ritningar (format, ritningsnummer, revision, "
SQLStr = SQLStr & "ordernr, skapad_av, skapad, innehall, kund, projektnamn... osv)"
SQLStr = SQLStr & "VALUES('"&format&"','"&ritningsnummer&"','"&revision&"'...osv)"
'Response.Write SQLStr
Databas.Execute SQLStr
Medlem sedan juni 2002136 inlägg
#14

Ska jag ersätta din kod med alla rs("....")=......?

Medlem sedan juli 20012 450 inlägg
#15
<%
   SET Conn= Server.CreateObject("ADODB.Connection")
   Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(ritregister))

   SET rs= Server.CreateObject("ADODB.Recordset")
   sql="SELECT * FROM tbl_Ritningar where 1=2"
   rs.open sql,conn,3,3
  
   rs.addnew
   rs("format")=format
   rs("ritningsnr")=ritningsnummer
   rs("revision")=revision
   rs("ordernr")=ordernr
   rs("skapad av")=skapadav
   rs("skapad")=skapad
   rs("innehåll")=innehall
   rs("kund")=kund
   rs("projektnamn")=projektnamn
   rs("kundritningsnr")=kundritningsnummer
   rs("filformat")=filformat
   rs("sparad")=sparad
   rs("arkiverad")=arkiverad
   rs("kopians revision")=arkivrev
   rs("säkerhet")=sakerhet
   rs("filformat")=filformat
   rs.update   
   rs.close
%>

Byt detta mot:

<%
   SET Conn= Server.CreateObject("ADODB.Connection")
   Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(ritregister))
SQLStr="INSERT tbl_Ritningar (format, ritningsnummer, revision, "
SQLStr = SQLStr & "ordernr, skapad_av, skapad, innehall, kund, projektnamn... osv)"
SQLStr = SQLStr & "VALUES('"&format&"','"&ritningsnummer&"','"&revision&"'...osv)"
'Response.Write SQLStr
Conn.Execute SQLStr

Ungefär...

Medlem sedan juni 2002136 inlägg
#16

Ok..thank you!!!

Medlem sedan juli 20012 450 inlägg
#17

Funkar det?

264 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
132 ms — deklarationer (db)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)