寻求高手解析下面一段程序代码，越详细越好！（本人不懂开发）

[qq_25828221]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Session.CodePage=65001%>
<%
dim conn
dim connstr
dim db

on error resume next
connstr="Provider=SQLOLEDB;Server=192.6.200.4\test;User ID=sa;Password=Whp12345;Database=whphr;"

set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if

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

dim KeyStr

sql=" exec SOALogin '" & request("username") & "'"

set rs=conn.execute(sql)
if rs.eof and rs.bof then
KeyStr =""
else
KeyStr= rs(0)
rs.close
CloseConn()
end if
%>

如何验证上面一段代码的结果？？？

[Only蜡笔小新]

恕在下孤陋寡闻 ，从未见过如此之JAVA代码！

[解开者]

楼主走错区了吧？这不是java代码啊，去vb区看看？

[这个逗b]

大概是连接数据库的驱动吧

[josh_wang]

楼主喝多了吧

[011100]

我竟然看不懂

[心随自在飞]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> LANGUAGE = VBSCRIPT 虽然看不到什么意思， 但我知道 这是 VBScript 不是 JavaScript