2017年红十字会改革:高分悬赏!如何转换代码!

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/20 01:23:15
<%
'///*****************
' 数据库链接类型
'*****************///

Dim conn,connstr,Rs,Rs1,Sql,Sql1

connstr="Data Source=" & Server.MapPath(datapath)&";Provider=Microsoft.Jet.OLEDB.4.0;"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr

sub close_conn()
conn.close
set conn=nothing
end sub

Set Rs=Server.CreateObject("ADODB.Recordset") '建立数据浏览对象
Set Rs1=Server.CreateObject("ADODB.Recordset") '建立数据浏览对象

%>
这段代码用什么工具可以转换成原代码!

这个不能转换!你可以将远代码给我!我给你编写!

原代码?你写出来的不是原代码吗?

这就是源代码, 不用转换.