ASP on WindowsXp Error

[xion]

When i try to run asp on windows xp that using L2asp it comes out with following error. Can someone help out?

HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services

--------------------------------------------------------------------------------

Technical Information (for support personnel)

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC SQL Server Driver][DBNETLIB]General network error. Check your network documentation.
/L2ASP/conn.asp, line 48


Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.0.3705; .NET CLR 2.0.40607)

Page:
GET /L2ASP/index.asp



-------------------------------------------------------------------------------------------------------
other than this, my oringal conn.asp is here. can someone look at?
-------------------------------------------------------------------------------------------------------
<%
'**************************************************************************
' Setting Info
'
' ms_sql_server_host_addr = MS SQL database address
' sql_server_username = MS SQL account
' sql_server_password = MS SQL password
' lin2db = Account database
' lin2world = Player information database
'
'**************************************************************************

dim sql_server_username,sql_server_password,lin2db,line2world
dim lin2db_conn,lin2world_conn
dim sys_type

'---------------------------------------------------------------------------
'-------------------------------Change below--------------------------------

'MS SQL Database address
ms_sql_server_host_addr = "127.0.0.1"

'MS SQL account
sql_server_username = "sa"

'MS SQL password
sql_server_password = "xxxxxx"

'Lin2db database(user_auth)
lin2db = "lin2db"

'Lin2world database(user_data)
lin2world = "lin2world"

' Encrypt or decrypt L2AuthD(otherwise will say password not match)
' 1) When using L2AuthD_encrypt.zip then set sys_type = "encrypt"
' 2) When using L2AuthD_decrypt.zip then set sys_type = "none"
sys_type = "encrypt"

'------------------------------DO NOT Change below--------------------------
'---------------------------------------------------------------------------

if checkZuJian <> 1 then
response.write "<font color=blue>Please run 'reg.bat' in the ActiveX folder!"
response.end 'exit
end if
set lin2db_conn = Server.CreateObject("ADODB.CONNECTION")
lin2db_conn.open "driver={SQL Server**;server="&ms_sql_server_host_addr&"; uid="&sql_server_username&";pwd="&sql_server_password&";database="&lin2db

set lin2world_conn = Server.CreateObject("ADODB.CONNECTION")
lin2world_conn.open "driver={SQL Server**;server="&ms_sql_server_host_addr&"; uid="&sql_server_username&";pwd="&sql_server_password&";database="&lin2world

sub close_conn()
lin2db_conn.close
set lin2db_conn = nothing
lin2world_conn.close
set lin2world_conn = nothing
end sub

function checkstr(oldstr)
checkstr = replace(oldstr & "", Chr(39), Chr(39)&Chr(39))
end function

function checkZuJian()
dim obj
on error resume next
set obj=CreateObject("shotgraph.image")
if -2147221005 = Err then
response.write "<font color=red>Please run 'install.exe' in the ActiveX folder!</font><br>"
checkZuJian = -1 'not support
else
checkZuJian = 1 'supprot success
end if
set obj = nothing
end function
%>
-------------------------------------------------------------------------------------------------------
I did all step following by setup guide, and tried use the real ip address instead of 127.0.0.1 it still come out with this. Please help. Thanks.

[MentaL]