renegade420
06-10-2010, 07:47 AM
Hello,
Below you will see I have the variable "attend" which is calling three different fields from a form.
attend = (request("attend_name") & request("attend_title") & request("attend_email") )
I was wondering if anyone knows how to insert the three fields data together into the same field in the database once submitted. thanks for your help! :)
Example:
sql = sql & "'" & Replace(Request.Form("attend"), "'", "") & "')"
FULL CODE
attend = (request("attend_name") & request("attend_title") & request("attend_email") )
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "d:/w-request.mdb"
sql = "INSERT INTO Meeting (contact_name,contact_title,contact_org,contact_phone,contact_fax,contact_web,contact_email,purpose, question,contact_date,datealt,attend)"
sql = sql & " VALUES "
sql = sql & "('" & Replace(Request.Form("Contact_Name"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Title"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Org"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Phone"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Fax"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Web"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Email"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Purpose"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Question"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Date"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("DateAlt"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("attend"), "'", "") & "')"
on error resume next
Below you will see I have the variable "attend" which is calling three different fields from a form.
attend = (request("attend_name") & request("attend_title") & request("attend_email") )
I was wondering if anyone knows how to insert the three fields data together into the same field in the database once submitted. thanks for your help! :)
Example:
sql = sql & "'" & Replace(Request.Form("attend"), "'", "") & "')"
FULL CODE
attend = (request("attend_name") & request("attend_title") & request("attend_email") )
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "d:/w-request.mdb"
sql = "INSERT INTO Meeting (contact_name,contact_title,contact_org,contact_phone,contact_fax,contact_web,contact_email,purpose, question,contact_date,datealt,attend)"
sql = sql & " VALUES "
sql = sql & "('" & Replace(Request.Form("Contact_Name"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Title"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Org"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Phone"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Fax"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Web"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Email"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Purpose"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Question"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("Contact_Date"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("DateAlt"), "'", "") & "',"
sql = sql & "'" & Replace(Request.Form("attend"), "'", "") & "')"
on error resume next