注册 登录
编程论坛 ASP技术论坛

语句未结束

yan876768390 发布于 2011-08-30 15:50, 460 次点击
<script language="vbscript">

Dim conn,rs,sqlstr
Set conn = CreateObject("ADODB.Connection")
conn.connectionstring = "Provider = SQLOLEDB;DATA SOURCE=SUDA-20110415KF;Initial Catalog=usedb;Integrated Security=SSPI;";   

conn.open
Set rs = CreateObject("ADODB.RecordSet")
sqlstr = "Select top 1 * from usetb"
rs.open sqlstr,conn,1,2
document.write rs(0) & " " & rs(1)
rs.close
Set rs = nothing
conn.close
Set conn = nothing
</script>


提示蓝色部分语句为结束,希望各位高手帮忙看看
3 回复
#2
dzt00012011-08-30 15:54
这是ASP代码,要放到<% %>里的
#3
yan8767683902011-08-30 16:03
<%

<script language="vbscript">

Dim conn,rs,sqlstr
Set conn = CreateObject("ADODB.Connection")
conn.connectionstring = "Provider = SQLOLEDB;DATA SOURCE=SUDA-20110415KF;Initial Catalog=usedb;Integrated Security=SSPI;";   

conn.open
Set rs = CreateObject("ADODB.RecordSet")
sqlstr = "Select top 1 * from usetb"
rs.open sqlstr,conn,1,2
document.write rs(0) & " " & rs(1)
rs.close
Set rs = nothing
conn.close
Set conn = nothing
</script>
%>
请问是这样么?我是新手,麻烦详细说一下,谢谢
#4
dzt00012011-08-30 16:24
<%
Dim conn,rs,sqlstr
Set conn = CreateObject("ADODB.Connection")
conn.connectionstring = "Provider = SQLOLEDB;DATA SOURCE=SUDA-20110415KF;Initial Catalog=usedb;Integrated Security=SSPI;";   

conn.open
Set rs = CreateObject("ADODB.RecordSet")
sqlstr = "Select top 1 * from usetb"
rs.open sqlstr,conn,1,2
document.write rs(0) & " " & rs(1)
rs.close
Set rs = nothing
conn.close
Set conn = nothing
%>
1