先將該網(wǎng)絡(luò)路徑掛載至一個盤(例子:Z)
10余年的平頂山網(wǎng)站建設(shè)經(jīng)驗,針對設(shè)計、前端、開發(fā)、售后、文案、推廣等六對一服務(wù),響應(yīng)快,48小時及時工作處理。營銷型網(wǎng)站的優(yōu)勢是能夠根據(jù)用戶設(shè)備顯示端的尺寸不同,自動調(diào)整平頂山建站的顯示方式,使網(wǎng)站能夠適用不同顯示終端,在瀏覽器中調(diào)整網(wǎng)站的寬度,無論在任何一種瀏覽器上瀏覽網(wǎng)站,都能展現(xiàn)優(yōu)雅布局與設(shè)計,從而大程度地提升瀏覽體驗。創(chuàng)新互聯(lián)公司從事“平頂山網(wǎng)站設(shè)計”,“平頂山網(wǎng)站推廣”以來,每個客戶項目都認真落實執(zhí)行。
然后image.fromfile("z:\1.jpg")
如果要程序直接連接DB2數(shù)據(jù)庫,必須要有連接數(shù)據(jù)庫的驅(qū)動程序,連接的代碼,你可以參考如下(以前用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;
}
如果你是開發(fā)桌面程序而又不想在客戶端安裝數(shù)據(jù)庫的驅(qū)動程序,那么你可以采用web網(wǎng)站(含webservice)或者remoting方式,只需要在服務(wù)端安裝驅(qū)動即可
下面是轉(zhuǎn)貼的代碼,和訪問自己電腦上的ACCESS操作是一樣的,無非是登錄以及訪問的問題, 代碼中的192.168.2.36可以換成你需要的遠程電腦的IP.
========================
如果想每次都能自動通過驗證
在當前目錄上建立一inf文件,如Server.inf(其它格式文件也可)
文件內(nèi)容如下:
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