ASP支持vbs和javascript。
默认iis设置是VBScript,在iis管理中,站点属性,主目录,应用程序设置“配置...”,选项,默认脚本语言,可以改成JavaScript。这样就可以直接在<%%>中间写js语句了。或者在ASP页面第一行写<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>,说明这个页面默认语句是js,后面可以直接用<%%>。
另外,可以用<script language="javascript" runat="server"></script>标记来写。并且,script标签可以支持两种语句在同一个页面出现,比如默认用js来写主体程序,有一些函数别人用vbs写好的,你可以直接调用。
例如:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<script runat=server language=vbscript>
function conn()
on error resume next
set cn=server.CreateObject("ADODB.connection")
cn.open("provider=microsoft.jet.oledb.4.0" + "data source = " &Server.MapPath("db.mdb"))
set conn=cn
if Err.Number>0 then
Response.Write("//数据库暂时不可用,请稍后访问!")
Response.End()
end if
end function
<script>
<%
var sqlStr="select * from table"
var cn=conn()//这里的conn就是vbs里定义的
var rs = Server.CreateObject("ADODB.recordset")
rs.Open(sqlStr,cn,3,1)
while(!rs.EOF){
Response.Write(rs("fname")+"</br>")
rs.MoveNext()
}
rs.close()
cn.close()
%>
可以参考一下<div id="aid"></div>
<script type="text/javascript" src="1.asp"></script>
1.asp 页面代码(这个页面不能有html代码如:)
<%
......
对数据库的查询....不一一列举,这要根据你需要来写代码的
.........
VIEW="这里是在DIV中显示的内容"
response.Write ("document.getElementById(""aid"").innerHTML ="&VIEW&"")
%>
y.asp执行后里面应该是js格式的代码才对。将
<%
Response.Write "<a href='"&rs("linkUrl")&"' target='_blank' title='"&rs("linkName")&"'>"&rs("linkName")&"</a> "
%>
改为
<%
Response.Write "document.write(""<a href='"&rs("linkUrl")&"' target='_blank' title='"&rs("linkName")&"'>"&rs("linkName")&"</a> "" )"
%>
--------------------
那可能是你y.asp里有多余的代码或者编码不一致也可能出问题
给你个简单的例子,再找不出原因那我也没办法了,
x.asp
<script language="JavaScript" src="y.asp"></script>
y.asp
<%
for i=1 to 10
Response.Write "document.write("""&i&" "" )"
next
%>
你把这两个文件分别保存一下不要加多余代码在iis下运行一下,结果会显示
1 2 3 4 5 6 7 8 9 10
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)