主题:  数据类型不匹配?

想入CG这个行

职务:普通成员
等级:1
金币:10.0
发贴:269
#12004/9/30 23:47:41
源代码:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>thank you!</title>
</head>

<body>
<%
set connect= Server.CreateObject("adodb.connection")
connect.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("weblog.mdb")
dim P1,P2,P3,P4,P5
dim Q1,Q2,Q3,Q4,Q5,Q6,Q7,SQ7,Q8
dim Q10,Q11,Q12,Q13,Q14,Q16
dim Q18,Q19,Q20,Q21,Q221,Q222
dim starttime
P1=request.Form("P1")
P2=request.Form("P2")
P3=request.Form("P3")
P4=request.Form("P4")
p5=request.Form("P5")
Q11=request.Form("Q11")
Q12=request.Form("Q12")
Q1=Q11+Q12
Q2=request.Form("Q2")
Q3=request.Form("Q3")
Q4=request.Form("Q4")
Q5=request.Form("Q5")
Q6=request.Form("Q6")
Q701=request.Form("Q701")
Q702=request.Form("Q702")
Q703=request.Form("Q703")
Q704=request.Form("Q704")
Q705=request.Form("Q705")
Q706=request.Form("Q706")
Q707=request.Form("Q707")
Q708=request.Form("Q708")
Q709=request.Form("Q709")
Q710=request.Form("Q710")
Q711=request.Form("Q711")
Q712=request.Form("Q712")
Q713=request.Form("Q713")
Q714=request.Form("Q714")
Q715=request.Form("Q715")
Q7=Q701+Q702+Q703+Q704+Q705+Q706+Q707+Q708+Q709+Q710+Q711+Q712+Q713+Q714+Q715
SQ7=request.Form("SQ7")
Q8=request.Form("Q8")

submit="INSERT INTO weblog(P1,P2,P3,P4,P5,Q1,Q2,Q3,Q4,Q5,Q6,Q7)values('"+P1+"','"+P2+"','"+P3+"','"+P4+"','"+P5+"',"+Q1+",'"+Q2+"','"+Q3+"','"+Q4+"','"+Q5+"','"+Q6+"','"+Q7+"')"
connect.close
set connect=Nothing
response.Write("谢谢您参与小可的网络日记调查问卷!")

%>
</body>
</html>

如果把Q7=Q701+Q702+Q703+Q704+Q705+Q706+Q707+Q708+Q709+Q710+Q711+Q712+Q713+Q714+Q715
这个去掉了,就没有问题,为什么? :confused:



缺缺

职务:管理员
等级:8
金币:41.0
发贴:9620
#22004/10/1 1:14:30
VBS中&做连接符,不要用+
容易产生歧义



想入CG这个行

职务:普通成员
等级:1
金币:10.0
发贴:269
#32004/10/2 0:45:03
为什么说我的INSERT语句有错误?
submit="INSERT INTO weblog(P1,P2,P3,P4,P5,Q1,Q2,Q3,Q4,Q5,Q6,Q701,Q702,Q703,Q704,Q705,Q706,Q707,Q708,Q709,Q710,Q711,Q712,Q713,Q714,Q715,SQ7,Q8,Q901,Q902,Q903,Q904,Q905,Q906,Q907,Q908,Q909,Q910,Q10,Q11,Q12,SQ12,Q13,Q14,Q1501,Q1502,Q1503,Q1504,Q1505,Q1506,Q1507,Q1508,Q1509,Q1510,Q1511,Q1512,Q16,Q171,Q172,Q173,Q174,Q175,Q176,Q177,Q178,Q179,Q18,Q19,Q20,Q21,Q22,SQ221,SQ222)values('"&P1&"','"&P2&"','"&P3&"','"&P4&"','"&P5&"',"&Q1&",'"&Q2&"','"&Q3&"','"&Q4&"','"&Q5&"','"&Q6&"','"&Q701&"','"&Q702&"','"&Q703&"','"&Q704&"','"&Q705&"','"&Q706&"','"&Q707&"','"&Q708&"','"&Q709&"','"&Q710&"','"&Q711&"','"&Q712&"','"&Q713&"','"&Q714&"','"&Q715&"','"&SQ7&"','"&Q8&"','"&Q901&"','"&Q902&"','"&Q903&"','"&Q904&"','"&Q905&"','"&Q906&"','"&Q907&"','"&Q908&"','"&Q909&"','"&Q910&"','"&Q10&"','"&Q11&"','"&Q12&"','"&SQ12&"','"&Q13&"','"&Q14&"','"&Q1501&"','"&Q1502&"','"&Q1503&"','"&Q1504&"','"&Q1505&"','"&Q1506&"','"&Q1507&"','"&Q1508&"','"&Q1509&"','"&Q1510&"','"&Q1511&"','"&Q1512&"','"&Q16&"','"&Q171&"','"&Q172&"','"&Q173&"','"&Q174&"','"&Q175&"','"&Q176&"','"&Q177&"','"&Q178&"','"&Q179&"','"&Q18&"','"&Q19&"','"&Q20&"','"&Q21&"','"&Q22&"','"&SQ221&"','"&SQ222&"')"
connect.execute submit



蓝鲸

职务:版主
等级:5
金币:42.1
发贴:2614
#42004/10/2 0:59:54
怕你了,这么长的SQL。
先不要执行,把Submit输出来看看。


非常大鱼

+ 小魔王 +

职务:普通成员
等级:1
金币:5.0
发贴:192
#52004/10/2 20:22:52
这样的程序不管是以后自己维护还是别人维护都会累死
有时候执行最快的程序并不一定是好的程序
容易维护与读懂的程序才是一个良好开发团队所需要的程序

给楼主一些建议
1.变量名(包括数据库字段名)不要用代号,最好用与实际意思相符的英文或者拼音
2.不要一句程序写太长,如果必须很长,可以分成几句写
3.程序中多加注释,不要认为自己看得懂就不加,因为三个月后你可能就看不懂了,更别说其他人
4.一个数据库表如果要这么多字段的话,那这个表维护起来会很累,可以将一些字段合并
5.数据库连接要开得晚,关得早,要把对数据库操作控制在最短的时间内



缺缺

职务:管理员
等级:8
金币:41.0
发贴:9620
#62004/10/12 22:00:36
楼主作的什么blog程序,怎们这么多字段?