Ⅰ VB 访问网络共享文件夹并新建文件
网络共享文件夹不能直接用VB里的Open语句，那是为本地文件用的
网络文件夹用API函数OpenFile
具体用法：
FileHandle = OpenFile( "\\ " & IP地址 & 文件路径 & "\ " & 文件名, lpReOpenBuff, OF_READ)
Ⅱ 如果不用net use的方法，vb.net 有办法访问共享文件或者共享文件夹吗
我不会VB，但是都是.net。c#的代码稍微转换一下就可以了。
C#实现访问网络共享文件夹，使用WNetAddConnection2A和WNetCancelConnection2A。
在目标服务器建立共享文件夹，建立访问账号test;
publicenumERROR_ID
{
ERROR_SUCCESS=0,//Success
ERROR_BUSY=170,
ERROR_MORE_DATA=234,
ERROR_NO_BROWSER_SERVERS_FOUND=6118,
ERROR_INVALID_LEVEL=124,
ERROR_ACCESS_DENIED=5,
ERROR_INVALID_PASSWORD=86,
ERROR_INVALID_PARAMETER=87,
ERROR_BAD_DEV_TYPE=66,
ERROR_NOT_ENOUGH_MEMORY=8,
ERROR_NETWORK_BUSY=54,
ERROR_BAD_NETPATH=53,
ERROR_NO_NETWORK=1222,
ERROR_INVALID_HANDLE_STATE=1609,
ERROR_EXTENDED_ERROR=1208,
ERROR_DEVICE_ALREADY_REMEMBERED=1202,
ERROR_NO_NET_OR_BAD_PATH=1203
}
publicenumRESOURCE_SCOPE
{
RESOURCE_CONNECTED=1,
RESOURCE_GLOBALNET=2,
RESOURCE_REMEMBERED=3,
RESOURCE_RECENT=4,
RESOURCE_CONTEXT=5
}
publicenumRESOURCE_TYPE
{
RESOURCETYPE_ANY=0,
RESOURCETYPE_DISK=1,
RESOURCETYPE_PRINT=2,
RESOURCETYPE_RESERVED=8,
}
publicenumRESOURCE_USAGE
{
RESOURCEUSAGE_CONNECTABLE=1,
RESOURCEUSAGE_CONTAINER=2,
RESOURCEUSAGE_NOLOCALDEVICE=4,
RESOURCEUSAGE_SIBLING=8,
RESOURCEUSAGE_ATTACHED=16,
RESOURCEUSAGE_ALL=(RESOURCEUSAGE_CONNECTABLE|RESOURCEUSAGE_CONTAINER|RESOURCEUSAGE_ATTACHED),
}
publicenumRESOURCE_DISPLAYTYPE
{
RESOURCEDISPLAYTYPE_GENERIC=0,
RESOURCEDISPLAYTYPE_DOMAIN=1,
RESOURCEDISPLAYTYPE_SERVER=2,
RESOURCEDISPLAYTYPE_SHARE=3,
RESOURCEDISPLAYTYPE_FILE=4,
RESOURCEDISPLAYTYPE_GROUP=5,
RESOURCEDISPLAYTYPE_NETWORK=6,
RESOURCEDISPLAYTYPE_ROOT=7,
RESOURCEDISPLAYTYPE_SHAREADMIN=8,
RESOURCEDISPLAYTYPE_DIRECTORY=9,
RESOURCEDISPLAYTYPE_TREE=10,
RESOURCEDISPLAYTYPE_NDSCONTAINER=11
}
[StructLayout(LayoutKind.Sequential)]
publicstructNETRESOURCE
{
publicRESOURCE_SCOPEdwScope;
publicRESOURCE_TYPEdwType;
publicRESOURCE_DISPLAYTYPEdwDisplayType;
publicRESOURCE_USAGEdwUsage;
[MarshalAs(UnmanagedType.LPStr)]
publicstringlpLocalName;
[MarshalAs(UnmanagedType.LPStr)]
publicstringlpRemoteName;
[MarshalAs(UnmanagedType.LPStr)]
publicstringlpComment;
[MarshalAs(UnmanagedType.LPStr)]
publicstringlpProvider;
}
publicclassNetworkConnection
{
[DllImport("mpr.dll")]
(NETRESOURCE[]lpNetResource,stringlpPassword,stringlpUserName,intdwFlags);
[DllImport("mpr.dll")]
(stringsharename,intdwFlags,intfForce);
publicstaticintConnect(stringremotePath,stringlocalPath,stringusername,stringpassword)
{
NETRESOURCE[]share_driver=newNETRESOURCE[1];
share_driver[0].dwScope=RESOURCE_SCOPE.RESOURCE_GLOBALNET;
share_driver[0].dwType=RESOURCE_TYPE.RESOURCETYPE_DISK;
share_driver[0].dwDisplayType=RESOURCE_DISPLAYTYPE.RESOURCEDISPLAYTYPE_SHARE;
share_driver[0].dwUsage=RESOURCE_USAGE.RESOURCEUSAGE_CONNECTABLE;
share_driver[0].lpLocalName=localPath;
share_driver[0].lpRemoteName=remotePath;
Disconnect(localPath);
intret=WNetAddConnection2A(share_driver,password,username,1);
returnret;
}
publicstaticintDisconnect(stringlocalpath)
{
returnWNetCancelConnection2A(localpath,1,1);
}
调用方式：
()
{
stringlocalpath="X:";
//intstatus=NetworkConnection.Connect(@"\192.168.0.2 est",localpath,@"test","test");
intstatus=NetworkConnection.Connect("\\192.168.0.2\test",localpath,@"test","test");
if(status==(int)ERROR_ID.ERROR_SUCCESS)
{
FileStreamfs=newFileStream(localpath+@"\123.txt",FileMode.OpenOrCreate);
using(StreamWriterstream=newStreamWriter(fs))
{
stream.WriteLine("你好呀，成功了");
stream.Flush();
stream.Close();
}
fs.Close();
}
else
{
Console.WriteLine(status);
}
NetworkConnection.Disconnect(localpath);
}
Ⅲ 如何用VB代码打开局域网上共享的文件夹
在网上邻居中找到你要复制文件夹的那台电脑，而且那个文件夹必须是共享的，然后你在网上邻居中双击进入那台电脑，里面就有那个文件夹了。不用那么麻烦。
Ⅳ 用VB怎样打开网络上共享的文件（此文件所在目录加有共享密码）
进入共享文件夹可以用直接路径的，不过如果要进入共享文件夹下子文件夹里，要先进入共享文件夹，然后再过，不然可能会出现文件查找不到(就算没有密码也有可能会出现)例如：进入局域网客户机PC的共享文件夹basic下子文件夹file里的文件text.txt就要先访问//pc/basic，写入密码，然后再进入//pc/basic/file/text.txt
Ⅳ 请教一下“VB 访问网络共享文件夹并新建文件”您是怎么做的谢谢！
VB访问网络共享文件夹与访问本地文件夹是没有什么区别的，比如你要打开与你的电脑同一个局域网的另一台名为“abcd”的电脑的共享文件夹“xxx”中的文本文件“123.txt”，可以这样：
Open "\\abcd\xxx\123.txt" For Input As #1
也可以用IP地址，比如：
Open "\\192.168.1.103\xxx\123.txt" For Input As #1