求高手把下面的VBscript转成JAVAscript 50

程序的目的就是把ACCESS数据库中调用数据,并把其中的换行符转换成asp中的换行符,我就会VB的写法,JAVA格式始终搞不定,由于我的其他部分都是用JAVA,所以求高手... 程序的目的就是把ACCESS数据库中调用数据,并把其中的换行符转换成asp中的换行符,我就会VB的写法,JAVA格式始终搞不定,由于我的其他部分都是用JAVA,所以求高手帮忙~~~
<%@LANGUAGE="VBSCRIPT"%>
<html>
<%
set conn = Server.CreateObject("ADODB.Connection")
DBPath = "G:\mxdj\Databases\mydata.mdb"
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& DBPath
%>
<head>
<title> test </title>
</head>
<body>
<%
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "select * from test where ID = 9 order by id desc",conn,1,1 'order by用来排序 id为排序字段,desc为倒序,asc为顺序,1,1为只读,1,3为可操作
str = rs("data_content")
str = replace(str,vbCrLf,"<br />")
response.write str '显示数据
rs.close '关闭rs记录
set rs=nothing '清除rs记录集
%>

</body>

</html>
谢谢解答,我的文件内容就是这样,但是为什么运行起来会出现
错误类型:
Provider (0x80020005)
类型不匹配。
/test.asp, 第 15 行
呢?

===============test.asp==============
<html>
<%
set conn = Server.CreateObject("ADODB.Connection")
DBPath = "G:\mxdj\Databases\mydata.mdb"
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& DBPath
%>
<head>
<title> test </title>
</head>
<body>
<%
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "select * from test where ID = 9 order by id desc",conn,1,1 'order by用来排序 id为排序字段,desc为倒序,asc为顺序,1,1为只读,1,3为可操作
str = rs.getString("data_content") //获取data_content的值
str = str.replace("\r\n","<br />") //替换换行符
out.print(str) //显示数据
rs.close '关闭rs记录
set rs=nothing '清除rs记录集
%>
</body>

</html>
===============================================
示数据
展开
 我来答
老刀正能量
2012-07-16 · TA获得超过2011个赞
知道大有可为答主
回答量:1487
采纳率:0%
帮助的人:1536万
展开全部
首先你要弄清楚你以上的代码是ASP的写法,而不是你所说的VBSCRIPT。

而你所说的转换成javascript,难道你要本地执行?还是将ASP代码转换成JAVA或JSP?

如果是转换成JAVA或JSP的话,包括你的数据库连接的方式也要改变!获取记录的方法用:

str = rs.getString("data_content") ; //获取data_content的值
str = str.replace("\r\n","<br />") ; //替换换行符
out.print(str); //显示数据
可可的文档
2012-07-16 · TA获得超过234个赞
知道答主
回答量:78
采纳率:0%
帮助的人:73.2万
展开全部
这是asp,转换不成javascript,除非你用nodejs,这涉及到服务器端程序了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
乐乐真淘气
2012-07-16
知道答主
回答量:1
采纳率:0%
帮助的人:1603
展开全部
这个不会,不好意思
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式