Type mismatch

ASP

5 svar · 209 visningar · startad av soffan76

Medlem sedan maj 2001684 inlägg
Trådstart#1

Hej!

Jag har ett fält i en databas av typen tal(långt heltal), decimaler: automatisk, standardvärde:0, Obligatorisk:nej, Indexerat:nej.
När jag ska uppdatera en post från adminsidan så går det inte att lämna detta fält tomt (om man nu inte vet vad man ska fylla i). Jag får då Type mismatch. Nån som vet varför?

Mvh Sofia

Medlem sedan juni 200032 967 inlägg
#2

Ska du inte uppdatera det så ska du inte ha med det i SQL-frågan, annars får du uppdatera med NULL.

Mvh,

Medlem sedan maj 2001684 inlägg
#3

Fattar inte riktigt hur du menar..så här ser min kod ut, vad är fel...

<%
If Request.Form("Benamning") <> "" and Request.Form("Gruppnr") <> ""and Request.Form("Fordonsnummer") <>"" then	

Set conn = server.createObject ("ADODB.Connection") 
DBPath = "DBQ=" & Server.MapPath("data/databas.mdb")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
SQL="SELECT * from Fordon where Fordonsnummer = " & Request.Form("Fordonsnummer") & ""
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, Conn, 1,2

if rs.eof then

rs.AddNew

rs("Benamning") = Request.Form("Benamning")    
rs("Gruppnr") = Request.Form("Gruppnr") 
rs("Fordonsnummer") = Request.Form("Fordonsnummer")
rs("Klassificering") = Request.Form("Klassificering")    
rs("Arsmodell") = Request.Form("Arsmodell")
rs("Miljogodkand") = Request.Form("Miljogodkand")   
rs("Medlemsnummer") = Request.Form("Medlemsnummer")   
rs("Pdf") = Request.Form("Pdf")   

rs.Update
rs.Close
conn.close 
set rs = nothing
set conn = nothing
%>

<h2>Lägg till ny maskin</h2>
<p>Maskinen &auml;r nu inf&ouml;rd i databasen.<br> 

<% Else 
Response.Write ("<p>En maskin med detta maskinnummer finns redan inlagd i databasen.<br> Välj ett annat maskinnummer eller redigera befintlig maskin.</p>")
Response.Write ("<a href='javascript:history.go(-1);'>Tillbaka</a>")
End if %>

<% Else %>
<p>Oj! Du gl&ouml;mde fylla i ett f&auml;lt.<br> Anv&auml;nd webbl&auml;sarens bak&aring;tknapp f&ouml;r att prova igen.

<% End if %>
Medlem sedan maj 2001684 inlägg
#4

Ska jag skriva nåt liknande detta?

  

if not Request.Form("Arsmodell") = "" then
	rs("Arsmodell") =  Request.Form("Arsmodell")
	else
	rs("Arsmodell") = " "
	end if
Medlem sedan dec. 200012 464 inlägg
#5
if not Request.Form("Arsmodell") = "" then
rs("Arsmodell") = Request.Form("Arsmodell")
end if
Medlem sedan maj 2001684 inlägg
#6

Tack!

Funkar strålande!

250 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
121 ms — deklarationer (db)
0 ms — hämta statistik (cache)
125 ms — hämta tråd, inlägg och bilagor (db)
120 ms — ändringar (db)