Question

asp+sql怎样显示查询结果

我的代码：
<%@language=vbscript %>
<%
dim ad,conn,sql,pagenum,i
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open"provider=SQLOLEDB;data source=HKZJZ-24J9L3Q7M\FOR973;initial catalog=for973;user id=sa;Password=sa"
Set ad = Server.CreateObject("ADODB.Recordset")

title=obj.Request("textfield")
author=obj.Request("textfield2")
org=obj.Request("textfield3")
pname=obj.Request("textfield4")
yr=obj.Request("textfield5")
classingnum=obj.Request("textfield6")
keyword=obj.Request("textfield7")
enb=obj.Request("textfield8")
chb=obj.Request("textfield9")

sql="select * from wenxianxinxi where title='"&title&"' and author='"&author&"'and orgnization='"&org&"' and periodicalname='"&pname&"' and years='"&yr&"' and classingnum='"&classingnum&"' and keyword='"&keyword&"' and enbrievary='"&enb&"' and chbrievary='"&cnb&"'"
ad.open sql,conn

do while i<ad.Pagesize and not ad.Eof
response.write"<center><B>数据查询结果</B></center>"
response.write"<table><tr><td><b>篇名</b></td><td><b>作者</b></td><td><b>年份</b></td><td><b>机构</b></td><td><b>刊物名</b></td><td><b>分类号</b></td><td><b>关键字</b></td><td><b>英文摘要</b></td><td><b>中文摘要</b></td></tr></table>"
response.write(ad("title"))
<td><%=ad("author")%></td>
<td><%=ad("years")%></td>
<td><%=ad("orgnization")%></td>
<td><%=ad("periodicalname")%></td>
<td><%=ad("classingnum")%></td>
<td><%=ad("keyword")%></td>
<td><%=ad("enbrievary")%></td>
<td><%=ad("chbrievary")%></td>

i=i+1
ad.MoveNext
loop
ad.close
Conn.close
%>

用response.write(ad("title"))，<td><%=ad("chbrievary")%></td>，和
response.write"<td>"+ad("chbrievary")+"</td>"都显示

Microsoft VBScript 编译器错误 (0x800A0408)
无效字符
/myasp/for973/资料共享/display.asp, line 27
response.write(ad("title"))

不知道哪里格式出错了，请教大家！

Answer 1

i = i + 1 的 i 没有初始值

把 do while 后面的条件用括号括起来，或者换成 while

Answer 2

rs_open参数含义
RS.OPEN
SQL,CONN,A,B
A:
ADOPENFORWARDONLY(=0)
只读,且当前数据记录只能向下移动
ADOPENKEYSET(=1)
只读,当前数据记录可自由移动
ADOPENDYNAMIC(=2)
可读写,当前数据记录可自由移动
ADOPENSTATIC(=3)
可读写,当前数据记录可自由移动,可看到新增记录
B:
ADLOCKREADONLY(=1)
缺省锁定类型，记录集是只读的，不能修改记录
ADLOCKPESSIMISTIC(=2)
悲观锁定，当修改记录时，数据提供者将尝试锁定记录以确保成功地编辑记录。只要编辑一开始，则立即锁住记录。
ADLOCKOPTIMISTIC(=3)
乐观锁定
，直到用Update方法提交更新记录时才锁定记录。
ADLOCKBATCHOPTIMISTIC(=4)
批量乐观锁定，允许修改多个记录，只有调用UpdateBatch方法后才锁定记录。
当不需要改动任何记录时，应该使用只读的记录集，这样提供者不用做任何检测。
对于一般的使用，乐观的锁定可能是最好的选择，因为记录只被锁定一小段时间，
数据在这段时间被更新。这减少了资源的使用。