XP下网络连接问题,好郁闷,弄了好几天了,高手帮忙呀!!!!!!!!!!!!!!!!

[le123]

net lst_h
lst_h.dwscope=0
lst_h.dwtype=0
lst_h.dwdisplaytype=0
lst_h.dwusage=0
lst_h.lplocalname=ls_driver
lst_h.lpremotename=ls_servername
lst_h.lpcomment=''
lst_h.lpProvider=''
long l_dwflag=0
long li_error
li_error=WNetAddConnection2(lst_h,ls_logword,ls_loguser,l_dwflag)
return li_error

------------funtction autoconn-----------

if WnetAddConnection(s_server,s_logpass,s_driver) = 0 then
//messagebox("新增映射","成功新增映射网络驱动器 " + upper(ls_drivername) + " ！")
return true
else
return false
end if

------------function autonet-------------
function boolean CreateDirectoryA(ref string pathname,int sa) Library "Kernel32.dll"
FUNCTION ulong WNetAddConnection(ref string lpszNetPath,ref string lpszPassword,ref string lpszLocalName) LIBRARY "mpr.dll" ALIAS FOR "WNetAddConnectionA"
FUNCTION ulong WNetCancelConnection(ref string lpszName,boolean bForce) LIBRARY "mpr.dll" ALIAS FOR "WNetCancelConnectionA"
FUNCTION ulong WNetAddConnection2(ref NET lpNetResource,ref string lpPassword,ref string lpUserName,ulong dwFlags) LIBRARY "mpr.dll" ALIAS FOR "WNetAddConnection2A"
FUNCTION ulong WNetCancelConnection2(ref string lpName,ulong dwFlags,ulong fForce) LIBRARY "mpr.dll" ALIAS FOR "WNetCancelConnection2A"

=====================================
if ls_os="winnt" then
if autoconn(ls_server,ls_logid,ls_logpass,'') <>0 then
messagebox('提示:','登陆网络失败!')
halt
end if
else
if autonet(ls_server,'','')=false then
messagebox('提示:','登陆网络失败!')
halt
end if
end if

这段代码在调用时XP终端显示登录失败,但2000系统,2003系统都运行正常,请高手指点!!!!!!!!

[le123]

还有WIN98的系统也能正常运行!

[魔鬼代言人5800]

你不用程序，在两个系统间调试，网络是否能调通，试试？

[圣殿骑士18]

眼熟

[le123]

网络肯定是通的!!!但程序运行提示登录失败!

[魔鬼代言人5800]

1.给SQL服务器打上最新补丁
2.不用SA用户，在SQL新建一个用户，程序用这个用户连接服务器试试

[guileen]

T_T >_< ~_~

[runsoft]

先设置网络是否通，JPEDIT.MCS ,先测试一下，估计是不能使用空密码访问XP。

[jdsnhan]

空密码是个应该注意的问题。还有就是操作系统本身的设置,如果不用程序,能直接访问吗?

[YOUYU6]

注意SQLserver的网络工具启用的协议,在XP上先用ODBC做一个测试,一般ODBC能连的都可以连,最好服务器只设一个TCP/IP连接肯定会通的