真搞不懂现在书写出来的东西都不负责任

有些教科书的确质量低劣，明显的错误不调试直接放到教科书里

很多人在我群里都问，为什么这样会出问题，都是从书上原版抄写的，也会出错

可想而知，现在写书的，不是为了造福人类，而是为了造福自己的钱包

大家现在别说教科书的问题了，　看看那里错了，呵呵！！！　我楼主

最前面的一段改成，
set myconn =Server.CreateObject("ADODB.Connection")
myconn.open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "&server.Mappath("database/user.mdb")
set mycomm=server.CreateObject("ADODB.Command")
mycomm.activeconnection=myconn
mycomm.commandtext="insert into [user] (userid,userpwd1,nickname,sex,age,qq,address,mail) vales (?,?,?,?,?,?,?,?)"
mycomm.commandtype=1



可能是你的第一句带有特殊字符或是空格造成的错误原因。
mycomm.parameters.append cm,createparameter("b1",200,,25) '这里也开始出错，createparameter我搜索了一下ado的createparameter好象是用在sql server上的，对于acc也有这种用法？sql server不熟悉了，期待楼下指教。

mycomm.parameters.append cm,createparameter
全都改成
mycomm.parameters.append mycomm.createparameter

还是会报错，insert into错误，再次期待楼下调整。

16楼，如你所说，还是报错！再次期待楼下调整个正确的

按16楼的改正以后，出现像15楼说的问题！
错误类型：
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'createparameter'
/zhuce/newzc_cl.asp, 第 170 行
就是这一行　mycomm.parameters.append mycomm,createparameter("b1",200,,25)
书上都是这样写的，Access数据库！楼上楼下的都再看看，一起把这个问题给解决了！

我建议看源程序

<%
set myconn=Server.CreateObject("ADODB.Connection")
set myconn.open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "&server.Mappath("user.mdb")
set mycomm=server.CreateObject("ADODB.Command") '建立命令对象mycomm
set mycomm.activeconnection=myconn'表示Command对象与Connection对象的连接关系
mycomm.commandtext="insert into user (userid,userpwd1,nickname,sex,age,qq,address,mail) values (?,?,?,?,?,?,?,?)" '?号表示未知的参数
mycomm.commandtype=1 '表示以上的数据查询类型为SQL （1代表SQL），指定查询类型可加快查询速度
mycomm.parameters.append mycomm.createparameter("b1",200,,25)
mycomm.parameters.append mycomm.createparameter("b2",200,,25)
mycomm.parameters.append mycomm.createparameter("b3",200,,25)
mycomm.parameters.append mycomm.createparameter("b4",200,,25)
mycomm.parameters.append mycomm.createparameter("b5",200,,25)
mycomm.parameters.append mycomm.createparameter("b6",200,,25)
mycomm.parameters.append mycomm.createparameter("b7",200,,25)
mycomm.parameters.append cm,createparameter("b8",200,,25)
'传递对象给Paramenter对象，实际传给了?,?
mycomm("b1")=1 '改成具体的值，我这里假设类型全是文本，以下相同
mycomm("b2")=1
mycomm("b3")=1
mycomm("b4")="男"
mycomm("b5")=1
mycomm("b6")=1
mycomm("b7")=1
mycomm("b8")=1
mycomm.Execute '执行在mycommandtext中定义的操作
myconn.close
%>
可能是 userid,userpwd1,nickname,sex,age,qq,address,mail 没有具体的值造成的错误，还有第一行注意不要把特殊字符或空格带进去。这样测试通过，建议不要完全相信书，就象上面一些朋友说的，现在有些书简直不负责任，误人了弟。