请问各位大虾,下面的语句是什么意思?
<SCRIPT   LANGUAGE=VBScript   RUNAT=Server>  
Sub   Application_OnStart
'-----------------------------------------
'   Connect   string   for   OLEDB
'-----------------------------------------
Dim   arr_DBString(4),   i
For   i   =   0   To   4
arr_DBString(i)   =   "DRIVER={SQL   Server};Server=127.0.0.1;Database=AredianShoeERP;UID=sa;PWD=sa; "
Next
Application( "AredianDataBase ")   =   arr_DBString
Application( "BuilderDataBase ")   =   "DRIVER={SQL   Server};Server=127.0.0.1;Database=ERPBuilder;UID=sa;PWD=sa; "

Application( "IsDebug ")   =   True
End   Sub

Sub   Application_OnEnd
'   Null
End   Sub

Sub   Session_OnStart
On   Error   Resume   Next
If   IsObject(Session( "DBConn "))   Then
Session( "DBConn ").Close
End   If
End   Sub  

Sub   Session_OnEnd
End   Sub
</SCRIPT>

------解决方案--------------------
Application( "AredianDataBase ") = arr_DBString
把数据库连接字符串数组赋值给Application( "AredianDataBase ") 变量

Application( "BuilderDataBase ") = "DRIVER={SQL Server};Server=127.0.0.1;Database=ERPBuilder;UID=sa;PWD=sa; "
把数据库连接字符串赋值给Application( "BuilderDataBase ")变量

------解决方案--------------------
现在强人越来越多~都用vbs,js连数据库了~
------解决方案--------------------
..我在想...用脚本连数据库....

别人在查看源代码的时候..岂不是就看出来了....