先将该网络路径挂载至一个盘（例子：Z）
10余年的平顶山网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。营销型网站的优势是能够根据用户设备显示端的尺寸不同，自动调整平顶山建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联公司从事“平顶山网站设计”,“平顶山网站推广”以来，每个客户项目都认真落实执行。
然后image.fromfile("z:\1.jpg")
如果要程序直接连接DB2数据库，必须要有连接数据库的驱动程序，连接的代码，你可以参考如下（以前用C#写的，你改成VB.NET即可，ODBC连接对象）
public OdbcConnection Db2Conn()
{
string str = "DRIVER=IBM DB2 ODBC DRIVER;UID=db2admin;PWD=db2admin;AUTHENTICATION=SERVER;PORT=50000;HOSTNAME=192.168.100.98;PROTOCOL=TCPIP;DATABASE=YCDATA";
OdbcConnection Conn = new OdbcConnection(str);
return Conn;
}
如果你是开发桌面程序而又不想在客户端安装数据库的驱动程序，那么你可以采用web网站（含webservice）或者remoting方式，只需要在服务端安装驱动即可
下面是转贴的代码,和访问自己电脑上的ACCESS操作是一样的,无非是登录以及访问的问题, 代码中的192.168.2.36可以换成你需要的远程电脑的IP.
========================
如果想每次都能自动通过验证
在当前目录上建立一inf文件，如Server.inf(其它格式文件也可)
文件内容如下：
net use \\192.168.2.36 "密码" /user:administrator
Private Sub Form_Load()
Dim CnStr As String
Dim Fn As Integer
Fn = FreeFile
Open App.Path "\Server.inf" For Input As #Fn
Line Input #Fn, ServerConn
Close #Fn
Shell (ServerConn)
CnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= \\192.168.2.36\c$\Program Files\Sygate\SON\Db\EventLog.mdb;Jet OLEDB:Engine Type=5"
Cn.Open CnStr
End Sub