|
| |
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
Help... - 10/8/2007 21:45:47
I want save the data i keyin in database but got this error. Error Type: Microsoft VBScript runtime (0x800A000D) Type mismatch: 'ConvertS' /sinheng/process.asp, line 15 <% companyname=Request.Form("company") contactperson=Request.Form("contact") address=Request.Form("address") country=Request.Form("country") postalcode=Request.Form("postalcode") contactno=Request.Form("tel") faxno=Request.Form("fax") email=Request.Form("email") enquiry=Request.Form("description") Sub InsertPurchaseDetails SQLInsert = "insert into tblPurchase (cname,cperson,address,country,postalcode,tel,faxno,email,description) " &_ " values (" &_ "'"& ConvertS(companyname) &"'," &_ "'"& ConvertS(contactperson) &"'," &_ "'"& ConvertS(address) &"'," &_ "'"& ConvertS(country) &"'," &_ "'"& ConvertS(postalcode) &"'," &_ "'"& ConvertS(contactno) &"'," &_ "'"& ConvertS(faxno) &"'," &_ "'"& ConvertS(email) &"'," &_ "'"& ConvertS(enquiry) &"'" &_ " )" Conn.Execute SQLInsert End Sub %> Any ideas ?? Thx....
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/8/2007 21:58:22
quote:
ORIGINAL: sssngt83 I want save the data i keyin in database but got this error. Error Type: Microsoft VBScript runtime (0x800A000D) Type mismatch: 'ConvertS' /sinheng/process.asp, line 15 You are just showing snippets of your code listing, exactly what is line 15?
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/8/2007 22:00:33
sorry, forget mention it... Line 15 is SQLInsert = "insert into tblPurchase (cname,cperson,address,country,postalcode,tel,faxno,email,description) " &_
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/8/2007 22:03:54
quote:
ORIGINAL: sssngt83 sorry, forget mention it... Line 15 is SQLInsert = "insert into tblPurchase (cname,cperson,address,country,postalcode,tel,faxno,email,description) " &_ Alright, what is ConvertS? Is it a function? I don't see ConvertS in the code you posted.
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/8/2007 22:13:48
I got show at post .... actually i just start learning asp, so not really know about it.
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/8/2007 22:21:56
quote:
ORIGINAL: sssngt83 I got show at post .... actually i just start learning asp, so not really know about it. Welcome and take your time to learn here. Lots of help here. So can you tell me what does ConvertS do? Did you declare it as a variable somewhere?
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/8/2007 23:43:42
actually i doing a form when user keyin data then will save to database. inside form got that information. Then i go see example they use like that, i dun know how to declare it ?? or any suggestion use other method ??
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/8/2007 23:47:38
quote:
ORIGINAL: sssngt83 Error Type: Microsoft VBScript runtime (0x800A000D) Type mismatch: 'ConvertS' /sinheng/process.asp, line 15 The error is about this ConvertS. This is maybe a function or a subroutine and probably has been declared somewhere in other .asp pages. If you can find out what it is, you are closer to solving your problem.
_____________________________
William Lee
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/8/2007 23:52:28
quote:
ORIGINAL: sssngt83 Sub InsertPurchaseDetails SQLInsert = "insert into tblPurchase (cname,cperson,address,country,postalcode,tel,faxno,email,description) " &_ " values (" &_ "'"& ConvertS(companyname) &"'," &_ "'"& ConvertS(contactperson) &"'," &_ "'"& ConvertS(address) &"'," &_ "'"& ConvertS(country) &"'," &_ "'"& ConvertS(postalcode) &"'," &_ "'"& ConvertS(contactno) &"'," &_ "'"& ConvertS(faxno) &"'," &_ "'"& ConvertS(email) &"'," &_ "'"& ConvertS(enquiry) &"'" &_ " )" Conn.Execute SQLInsert End Sub %> Any ideas ?? Thx.... Another way is to remove the ConvertS altogether and test your script, like this: SQLInsert = "insert into tblPurchase (cname,cperson,address,country,postalcode,tel,faxno,email,description) " &_ " values (" &_ "'"& (companyname) &"'," &_ "'"& (contactperson) &"'," &_ "'"& (address) &"'," &_ "'"& (country) &"'," &_ "'"& (postalcode) &"'," &_ "'"& (contactno) &"'," &_ "'"& (faxno) &"'," &_ "'"& (email) &"'," &_ "'"& (enquiry) &"'" &_ " )" You will probably meet with another error, but that will help you to know better.
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/8/2007 23:56:47
Error Type: Microsoft VBScript runtime (0x800A01A8) Object required: 'Conn' This line error "Conn.Execute SQLInsert "
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/8/2007 23:59:20
quote:
ORIGINAL: sssngt83 Error Type: Microsoft VBScript runtime (0x800A01A8) Object required: 'Conn' This line error "Conn.Execute SQLInsert " I ask you again, is that all the code you have in your .asp page? Can you post the rest? Where is your declare statements?
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/9/2007 0:03:06
This is all the code <%
companyname=Request.Form("company")
contactperson=Request.Form("contact")
address=Request.Form("address")
country=Request.Form("country")
postalcode=Request.Form("postalcode")
contactno=Request.Form("tel")
faxno=Request.Form("fax")
email=Request.Form("email")
enquiry=Request.Form("description")
Sub InsertPurchaseDetails
SQLInsert = "insert into tblPurchase (cname,cperson,address,country,postalcode,tel,faxno,email,description) " &_
" values (" &_
"'"& ConvertS(companyname) &"'," &_
"'"& ConvertS(contactperson) &"'," &_
"'"& ConvertS(address) &"'," &_
"'"& ConvertS(country) &"'," &_
"'"& ConvertS(postalcode) &"'," &_
"'"& ConvertS(contactno) &"'," &_
"'"& ConvertS(faxno) &"'," &_
"'"& ConvertS(email) &"'," &_
"'"& ConvertS(enquiry) &"'" &_
" )"
'response.write sqlinsert
'response.end
Conn.Execute SQLInsert
End Sub
%>
<%
InsertPurchaseDetails
'SendMail()
'Response.Redirect("confirmation.htm")
%>
<%
Sub SendMail()
Name=Request.form("txtname")
Address=Request.form("txtaddress")
Telephonenumber=Request.form("txttelephoneno")
EmailAddress=Request.form("txtemailadd")
Comment=Request.form("txtcomment")
set myobjMail = Server.CreateObject("CDONTS.NewMail")
myObjMail.mailFormat=0
myObjMail.BodyFormat=0
'Dim mySmartMail
'Set mySmartMail = Server.CreateObject("aspSmartMail.SmartMail")
'mySmartMail.Server = "202.172.244.181"
'mySmartMail.Server = "mail.akyweb.com"
'mySmartMail.ContentType = "text/html"
'mySmartMail.Charset = "ISO-8859-1"
body = "<style type=""text/css"">"
body = body & "<!--"
body = body & ".pagebg { background-color: white; background-repeat: repeat-x; background-position: center top;}.pagebg2 { background-color: F5CB14; background-repeat: repeat-x; background-position: left top;}.purple { background-color: A11E61; background-repeat: no-repeat; background-position: right bottom;}.yellow { background-color: FFD34B; background-repeat: no-repeat; background-position: right bottom;}.adsr { background-repeat: repeat-y; background-position: right top;}.dot { background-repeat: repeat-y; background-position: center top;}.arial11 { font-family: Arial; font-size: 11px;}.arial10 { font-family: Arial; font-size: 10px;}.arail11bold { font-family: Arial; font-size: 11px; font-weight: bold;}.arail15bold { font-family: Arial; font-size: 15px; font-weight: bold;}.arial12bold { font-family: Arial; font-size: 12px; font-weight: bold;}.verdana12bold { font-family: Verdana; font-size: 12px; font-weight: bold;}.verdana11bold { font-family: Verdana; font-size: 11px; font-weight: bold;}.verdana11{ font-family: Verdana; font-size: 11px; }.verdana10{ font-family: Verdana; font-size: 10px; }A:link { text-decoration: none; color: #ffffff; }A:visited {text-decoration: none; color: #ffffff; }A:hover {text-decoration: none; color: #FF7A2E; }A:active {text-decoration: none; color: #ffffff; }A.s1:link { text-decoration: none; color: #3B1E00; }A.s1:visited {text-decoration: none; color: #3B1E00; }A.s1:hover {text-decoration: none; color: #ffffff; }A.s1:active {text-decoration: none; color: #3B1E00; }A.s2:link { text-decoration: none; color: #ffffff; }A.s2:visited {text-decoration: none; color: #ffffff; }A.s2:hover {text-decoration: none; color: #3B1E00; }A.s2:active {text-decoration: none; color: #ffffff; }A.s3:link { text-decoration: none; color: #434141; }A.s3:visited {text-decoration: none; color: #434141; }A.s3:hover {text-decoration: none; color: #BD2F13; }A.s3:active {text-decoration: none; color: #434141; }A.s4:link { text-decoration: underline; color: #808080; }A.s4:visited {text-decoration: underline; color: #808080; }A.s4:hover {text-decoration: underline; color: #2F6FB9; }A.s4:active {text-decoration: underline; color: #808080; }A.s5:link { text-decoration: none; color: #ffffff; }A.s5:visited {text-decoration: none; color: #ffffff; }A.s5:hover {text-decoration: underline; color: #ffffff; }A.s5:active {text-decoration: none; color: #ffffff; }A.s6:link { text-decoration: underline; color: #ffffff; }A.s6:visited {text-decoration: underline; color: #ffffff; }A.s6:hover {text-decoration: underline; color: #ffffff; }A.s6:active {text-decoration: underline; color: #ffffff; }A.s7:link { text-decoration: underline; color: #000000; }A.s7:visited {text-decoration: underline; color: #000000; }A.s7:hover {text-decoration: underline; color: #000000; }A.s7:active {text-decoration: underline; color: #000000; }A.C:link { text-decoration: none; color: #FF7A2E; }A.C:visited {text-decoration: none; color: #FF7A2E; }A.C:hover {text-decoration: none; color: #FF7A2E; background-color: #846749; BORDER-RIGHT: 0px solid; BORDER-TOP: #ffffff 0px solid; BORDER-LEFT: #ffffff 0px solid; BORDER-BOTTOM: #ffffff 0px solid;}A.C:active {text-decoration: none; color: #ffffff; background-color: #FF7A2E; BORDER-RIGHT: 0px solid; BORDER-TOP: 0px solid; BORDER-LEFT: 0px solid; BORDER-BOTTOM: 0px solid;}A.d:link { text-decoration: none; color: #ffffff; }A.d:visited {text-decoration: none; color: #ffffff; }A.d:hover {text-decoration: none; color: #ffffff; background-color: #846749; BORDER-RIGHT: 0px solid; BORDER-TOP: #ffffff 0px solid; BORDER-LEFT: #ffffff 0px solid; BORDER-BOTTOM: #ffffff 0px solid;}A.d:active {text-decoration: none; color: #FF7A2E; background-color: #ffffff; BORDER-RIGHT: 0px solid; BORDER-TOP: 0px solid; BORDER-LEFT: 0px solid; BORDER-BOTTOM: 0px solid;}"
body = body & "-->"
body = body & "</style>"
body = body & "<body topmargin=""0"" leftmargin=""0"" rightmargin=""0"" bottommargin=""0"" class=""pagebg"" >"
body = body & "<div align=""center""><div align=""center""><table border=""0"" width=""500"" cellspacing=""0"" cellpadding=""0"" id=""table1"" height=""100%""><tr><td valign=""top"" bgcolor=""#56391B""><table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""0"" id=""table3""><tr><td height=""56"" rowspan=""2""><img border=""0"" src=""http://www.akyweb.com.sg/ogenic/images/logoOgenic.gif"" width=""300"" height=""111""></td><td width=""4"" bgcolor=""#583B1D""></td></tr><tr><td height=""45"" bgcolor=""#583B1D"" width=""647""><table border=""0"" width=""100%"" cellspacing=""3"" id=""table26"" cellpadding=""2""><tr><td align=""right"" valign=""bottom"" class=""arail15bold""><font color=""#FFFFFF"">Enquiry from "& Name &"</font></td></tr></table></td></tr><tr><td height=""55"" colspan=""3""><table border=""0"" width=""104%"" cellpadding=""2"" bgcolor=""#66FFFF"" id=""table27"" height=""180""><tr><td bgcolor=""#66FFFF"" valign=""top""><div align=""center""><table cellspacing=""3"" cellpadding=""3"" border=""0"" id=""table30"" class=""verdana11"" width=""346""><tr><td width=""150""><b><font color=""#000000"">Name : </font></b></td><td><font color=""#000000"">"&Name&"</font></td></tr><tr><td width=""150""><b><font color=""#000000"">Address : </font></b></td><td><font color=""#000000"">"&Address&"</font></td></tr><tr><td width=""150""><b><font color=""#000000"">Telephone no : </font></b></td><td><font color=""#000000"">"&Telephonenumber&"</font></td></tr><tr><td width=""150""><b><font color=""#000000"">Email Address : </font></b></td><td><font color=""#000000"">"&EmailAddress&"</font></td></tr><tr><td width=""150""><b><font color=""#000000"">Comments : </font></b></td><td><font color=""#000000"">"&Comment&"</font></td></tr></table></div> </td></tr></table><table border=""0"" width=""100%"" id=""table28"" class=""arial11"" height=""40""><tr><td width=""500""><p align=""center""><font color=""#FFFFFF"">COPYRIGHT OGENIC GROUP 2008. ALL RIGHTS RESERVED.POWERED BY <a href=""www.akyweb.com"">AKYWEB.COM</a></font></p></td><td> </td></tr></table></td></tr></table></td></tr></table></div></div></body>"
'mySmartMail.SenderName = Name
'mySmartMail.SenderAddress = EmailAddress
'mySmartMail.Recipients.Add "sales@ogenicgroup.com"
'mySmartMail.CCs.Add "boon@akyweb.com"
'mySmartMail.Subject = "Enquiry from OGENICGroup Website"
'mySmartMail.Body = body
'mySmartMail.SendMail
'set mySmartMail= nothing
myObjMail.from = ""
myObjMail.to = ToEmail
myObjMail.subject ="Your OGENIC Registration Info"
myObjMail.body = body
myObjMail.send
set myObjMail = nothing
end sub
%>
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/9/2007 0:05:10
Your website contains only this ONE process.asp?
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/9/2007 0:07:32
Yes.
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/9/2007 0:11:17
ok, it is not so simple, it cannot work with only ONE .asp file. Can you post your URL so that it helps us to understand better what you are attempting to do.
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/9/2007 1:54:08
Try to see other example and try it....
|
|
|
|
William Lee
Posts: 1079 Joined: 1/25/2002 From: Singapore Status: offline
|
RE: Help... - 10/9/2007 1:58:37
This example of yours will work, except you have not declare the ADODB objects properly. Do you know what is the ConnectionString to your database? If you don't know, you won't go far with another example. You got to find out these info from your supervisor or superior.
_____________________________
William Lee
|
|
|
|
sssngt83
Posts: 30 Joined: 10/8/2007 Status: offline
|
RE: Help... - 10/9/2007 2:00:43
Ok. Thx a lot...
|
|
New Messages |
No New Messages |
Hot Topic w/ New Messages |
Hot Topic w/o New Messages |
Locked w/ New Messages |
Locked w/o New Messages |
|
Post New Thread
Reply to Message
Post New Poll
Submit Vote
Delete My Own Post
Delete My Own Thread
Rate Posts
|
|
|