错误 '80040e10',COUNT 字段不正确?
各位,我把我仅有的分都贴出来了,希望得到您热心的帮助,在此我对您表示感谢!
以下代码运行时却出现:
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e10'
[Microsoft][ODBC Microsoft Access Driver]COUNT 字段不正确
/web/news/noname2.asp,行39
可是我根本就没有count字段啊
<!--#include file="conn.asp"-->
<%
if request("body")<>"" then
title=request("title")
body=request("body")
source=request("source")
author=request("author")
ndate=request("date")
' 取得最大的id数
set objrs=server.createobject("adodb.recordset")
mysql="select id from learnasp "
objrs.open mysql,objconn,2
objrs.movelast
id=objrs("id")+1
response.write(id)
objrs.close
'取得模板文件
mysql="select * from templet where t_id=1"
objrs.open mysql,objconn,1,1
'替换模板文件中的特殊字符
t_content=objrs("t_content")
t_content=replace(t_content,"[title]",title)
t_content=replace(t_content,"[author]",author)
t_content=replace(t_content,"[url]",source)
t_content=replace(t_content,"[date]",ndate)
t_content=replace(t_content,"[id]",id)
t_content=replace(t_content,"[content]",body)
objrs.close
'将替换后的数据输入数据库
mysql="insert into learnasp(ntitle,ncontent,nauthor,ndate,nsource)"& _
" values('"&title&"','"&t_content&"','"&author&"','"&ndate&"','"&source&"')"
objrs.open mysql,objconn,1,3
'释放资源
set objrs=nothing
objconn.close
set objconn=nothing
end if
%>
<form action="noname2.asp" method="post">
<table>
<tr><td>
日期:<input type="text" name="date" value=<%response.write(date())%>>
标题:<input type="text" name="title"> <br>
作者:<input type="text" name="author">
</td></tr>
<tr><td>
<input type="text" name="source"><br>
</td></tr>
<tr><td>
<textarea name="body" cols=70 rows=30>
</textarea>
</td></tr>
<tr><td>
<input type="submit" value="确定">
</td></tr>
</form>
以下代码运行时却出现:
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e10'
[Microsoft][ODBC Microsoft Access Driver]COUNT 字段不正确
/web/news/noname2.asp,行39
可是我根本就没有count字段啊
<!--#include file="conn.asp"-->
<%
if request("body")<>"" then
title=request("title")
body=request("body")
source=request("source")
author=request("author")
ndate=request("date")
' 取得最大的id数
set objrs=server.createobject("adodb.recordset")
mysql="select id from learnasp "
objrs.open mysql,objconn,2
objrs.movelast
id=objrs("id")+1
response.write(id)
objrs.close
'取得模板文件
mysql="select * from templet where t_id=1"
objrs.open mysql,objconn,1,1
'替换模板文件中的特殊字符
t_content=objrs("t_content")
t_content=replace(t_content,"[title]",title)
t_content=replace(t_content,"[author]",author)
t_content=replace(t_content,"[url]",source)
t_content=replace(t_content,"[date]",ndate)
t_content=replace(t_content,"[id]",id)
t_content=replace(t_content,"[content]",body)
objrs.close
'将替换后的数据输入数据库
mysql="insert into learnasp(ntitle,ncontent,nauthor,ndate,nsource)"& _
" values('"&title&"','"&t_content&"','"&author&"','"&ndate&"','"&source&"')"
objrs.open mysql,objconn,1,3
'释放资源
set objrs=nothing
objconn.close
set objconn=nothing
end if
%>
<form action="noname2.asp" method="post">
<table>
<tr><td>
日期:<input type="text" name="date" value=<%response.write(date())%>>
标题:<input type="text" name="title"> <br>
作者:<input type="text" name="author">
</td></tr>
<tr><td>
<input type="text" name="source"><br>
</td></tr>
<tr><td>
<textarea name="body" cols=70 rows=30>
</textarea>
</td></tr>
<tr><td>
<input type="submit" value="确定">
</td></tr>
</form>
...全文


