Click here to Skip to main content
13,196,464 members (50,416 online)

Visual Basic

 
QuestionVB.NET Parameters error Pin
Diego Carrion11-Oct-12 4:12
memberDiego Carrion11-Oct-12 4:12 





Employee ID :



Customer ID :



Order Date :



Shipped Date :



Shipper ID :



Ship Name :



Ship Address :



Ship City :



Ship State/Province :



Ship ZIP/Postal Code :



Ship Country/Region :



Shipping Fee :



Taxes :



Payment Type :



Paid Date :



Notes :



Tax Rate :



Tax Status :



Status ID :


 






<%
Dim Employee_ID, Customer_ID, Order_Date, Shipped_Date, Shipper_ID, Ship_Name,

Ship_Address, Ship_City, Ship_State_Province, Ship_ZIP_Postal_Code, Ship_Country_Region,

Shipping_Fee, Taxes, Payment_Type, Paid_Date, Notes, Tax_Rate, Tax_Status, Status_ID
Dim sConnString, connection, sSQL

Employee_ID=Request.Form("Employee_ID")
Customer_ID=Request.Form("Customer_ID")
Order_Date=Request.Form("Order_Date")
Shipped_Date=Request.Form("Shipped_Date")
Shipper_ID=Request.Form("Shipper_ID")
Ship_Name=Request.Form("Ship_Name")
Ship_Address=Request.Form("Ship_Address")
Ship_City=Request.Form("Ship_City")
Ship_State_Province=Request.Form("Ship_State_Province")
Ship_ZIP_Postal_Code=Request.Form("Ship_ZIP_Postal_Code")
Ship_Country_Region=Request.Form("Ship_Country_Region")
Shipping_Fee=Request.Form("Shipping_Fee")
Taxes=Request.Form("Taxes")
Payment_Type=Request.Form("Payment_Type")
Paid_Date=Request.Form("Paid_Date")
Notes=Request.Form("Notes")
Tax_Rate=Request.Form("Tax_Rate")
Tax_Status=Request.Form("Tax_Status")
Status_ID=Request.Form("Status_ID")

sSQL = "INSERT INTO Orders (Employee_ID, Customer_ID, Order_Date, Shipped_Date,

Shipper_ID, Ship_Name, Ship_Address, Ship_City, Ship_State_Province,

Ship_ZIP_Postal_Code, Ship_Country_Region, Shipping_Fee, Taxes, Payment_Type, Paid_Date,

Notes, Tax_Rate, Tax_Status, Status_ID) Values (" & Employee_ID & ", " & Customer_ID & ",

#" & Order_Date & "#, #" & Shipped_Date & "#, " & Shipper_ID & ", '" & Ship_Name & "', '"

& Ship_Address & "', '" & Ship_City & "', '" & Ship_State_Province & "', '" &

Ship_ZIP_Postal_Code & "', '" & Ship_Country_Region & "', '' & Shipping_Fee & '', '' &

Taxes & '', '" & Payment_Type & "', #" & Paid_Date & "#, '" & Notes & "', '" & Tax_Rate &

"', '" & Tax_Status & "', '" & Status_ID & "')"


sConnString="PROVIDER=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Server.MapPath

("/database/Examen.mdb")
Set connection = Server.CreateObject("ADODB.Connection")

connection.Open(sConnString)
connection.execute(sSQL)


response.write "The form information was inserted successfully."

connection.Close
Set connection = Nothing
%>

I have an HTML Form that request various data types and I keep getting the following error:

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/ordersconnection3.asp, line 32

It's a Microsoft Access Database. Any help will be appreciated.
AnswerRe: VB.NET Parameters error Pin
Simon_Whale11-Oct-12 4:45
memberSimon_Whale11-Oct-12 4:45 
GeneralRe: VB.NET Parameters error Pin
Diego Carrion11-Oct-12 4:47
memberDiego Carrion11-Oct-12 4:47 
GeneralRe: VB.NET Parameters error Pin
ChandraRam11-Oct-12 11:06
memberChandraRam11-Oct-12 11:06 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.


Advertise | Privacy |
Web02 | 2.8.171019.1 | Last Updated 17 Oct 2017
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid