我们公司的定单假如员工的一时疏忽，忘记归档（服务器），此定单就会耽误好几天，现在好了，老板叫我从软件上控制，凡检查服务器上没有归档文件时就不让存盘．我找了些关于映射网络驱动器的资料，还是搞不定，下面是我的代码：
*-- 声明 API 函数 WNetAddConnection
Declare Long WNetAddConnection in "mpr.dll" String lpszNetPath,String lpszPassword, String lpszLocalName
WNetAddConnection(LpszNetPath,LpszPassword,LpszLocalName)
LpszNetPath='\\navy\file\'
LpszPassword='123'
LpszLocalName='M:'

它总是提示　LpszNetPath　找不到变量，帮帮忙！
另外，我要检测服务器上是否有资料，需要找到软件上对应的服务器上的此份资料.;如:软件上的资料是05011111,在服务器上的位置为 \\navy\file\0501\05011111\05011111.drl 请问怎么样检测名为'05011111.DRL'的资料是否存在.万分感谢!

楼上的朋友,你好,用FILE()好象不顶用,我给你说一下我的思路:
我在其它书上找到了能检测单个文件夹里的文件是否存在,但是要共享每个文件夹,很麻烦,每次共享都会消耗服务器很多资源.我想共享整个盘,共享名为FILE,然后有很多数组,如( 0501,0502,0503)文件夹,在0501这个文件夹里又有很多文件,前面4位都为0501,后面4位为递增数(如05011111,05011112).每个文件都为8位不重复,我用了下面的代码,显示不行,看一下是哪里有问题,好吗?谢谢!!

PUBLIC A,B,C,D,E,F,G,H
filename="A"+"B"+"C"+"D"+"E"+"F"+"G"+"H"
FILENAME1="A"+"B"+"C"+"D"
filename=ALLTRIM(CPDH) &用来被检测的文件名
LpszNetPath='\\navy\file\FILENAME1'
LpszPassword=''
LpszLocalName=' '&&不在本地显示共享

cFileName=LpszNetPath+"\"+"filename.drl"

DECLARE integer WNetAddConnection in WIN32API string,string,string
DECLARE integer WNetCancelConnection in WIN32API String,integer

WNetCancelConnection(LpszNetPath,1) &&不管有没有先强行断开

IF WNetAddConnection(LpszNetPath,LpszPassword, '') != 0
MESSAGEBOX('无法登录服务器或未设置共享或密码不对或你当前WINDOWS的用户没在服务器注册',48,'连接数据失败')
RETURN
ENDIF
If FILE('&cFileName')
Messagebox('你已成功审完此单',46,'提示')
ELSE
Messagebox('你没有拖钻孔,不能存盘!',48,'警告!')
ENDIF

WNetCancelConnection(LpszNetPath,1) &&断开