0x80040E10

ASP

5 svar · 248 visningar · startad av martinpartin 16 maj 2003

martinpartinMedlem sedan jan. 2001373 inlägg

Frågan16 maj 2003 07:56#1

HEj,

Får detta medelade när jag kör denna kod.
Jag är säker på att strängara innhåller värden....
får detta fel meddelande.

Microsoft JET Database Engine (0x80040E10)
No value given for one or more required parameters.

Nån som vet vad det kan vara ?

Mvh
Martin

----------------------------------------------------------------------

<% @Language = VBScript %>
<% Option Explicit %>
<% Response.ExpiresAbsolute = Now() - 1 %>

<%
Dim mdbfile, Connect
    

mdbfile = Server.MapPath( "database.mdb" )

    Set Connect = Server.CreateObject( "Adodb.Connection" )
    Connect.Provider = "Microsoft.Jet.OLEDB.4.0"
    Connect.ConnectionString = "Data Source='" & mdbfile & "'"
    Connect.Open

   Dim str_count, str_type
   str_count = Request.QueryString("count")
   str_type = Request.QueryString("type2")

   Dim str_date, str_resource, str_ampm, str_time

   str_date = Request.Form("date")
   str_resource = Request.Form("resource")
   str_time = Request.Form("time")

Response.Write(""& str_date &"<BR>")
Response.Write(""& str_resource &"<BR>")

Response.Write(""& str_time &"<BR>")

Dim SQL01

SQL01 = "DELETE FROM reservations WHERE date = '"& str_date &"' AND resource = '"& str_resource &"' AND ampm = '"& str_time &"'" 

connect.execute(SQL01) 
connect.close 

%>

m_soderlundMedlem sedan sep. 20026 425 inlägg

16 maj 2003 07:59#2

En sökning på Google gav denna sida: adopenstatic.com/faq/80040e10.asp. :D

/r - Dessutom är date ett reserverat ord i SQL. Döp om fältet till ex. dt_date eller dt.
Sen har du ju inte deklarerat alla variabler heller..

jimpaMedlem sedan jan. 2001361 inlägg

16 maj 2003 08:01#3

Dim str_date, str_resource, str_time

@ndersMedlem sedan juni 200032 967 inlägg

16 maj 2003 08:02#4

... och en sökning på webForum gav:

många skrev:

Lägg kod inom [kod]-taggar så den blir så lättläst som möjligt!

Mvh,

PalleMedlem sedan apr. 20003 174 inlägg

16 maj 2003 08:02#5

Skriv ut din sql-sats och kolla så alla värden följer med dit, det verkar inte som om dem gör det.

ex.

[red]SQL01 = "DELETE FROM reservations WHERE date = '"& str_date &"' AND resource = '"& str_resource &"' AND ampm = '"& str_time &"'"
Response.Write SQL01
Response.End[/red]

martinpartinMedlem sedan jan. 2001373 inlägg

16 maj 2003 08:04#6

Häng mig och släpa mig efter en bil...

Jag skrev fel namn för en kollum..

Och jag ska börja använda kod-taggar...

Tack ändå !!