打開(kāi)程序文件后,在“解決方案資源管理器”中右擊“解決方案”,選擇重新生成解決方案。再加載
創(chuàng)新互聯(lián)公司憑借專(zhuān)業(yè)的設(shè)計(jì)團(tuán)隊(duì)扎實(shí)的技術(shù)支持、優(yōu)質(zhì)高效的服務(wù)意識(shí)和豐厚的資源優(yōu)勢(shì),提供專(zhuān)業(yè)的網(wǎng)站策劃、網(wǎng)站制作、網(wǎng)站設(shè)計(jì)、網(wǎng)站優(yōu)化、軟件開(kāi)發(fā)、網(wǎng)站改版等服務(wù),在成都十余年的網(wǎng)站建設(shè)設(shè)計(jì)經(jīng)驗(yàn),為成都上千中小型企業(yè)策劃設(shè)計(jì)了網(wǎng)站。
轉(zhuǎn)載:
看看這對(duì)你有沒(méi)有幫助。
終于試驗(yàn)成功了!
我在原本只有win2000 professional 的機(jī)器上又安裝了一個(gè)win2000 server,并將其配置成主域
控制器,然后在另一臺(tái)win98機(jī)器上用Administrator登錄,啟動(dòng)VB,寫(xiě)個(gè)小程序試了一下,OK!
為避免大家繼續(xù)在黑暗中摸索,我現(xiàn)將試驗(yàn)用的具體例子及步驟詳述如下(一個(gè)最簡(jiǎn)單的例子):
1、在win2000 server機(jī)器上用VB(+SP5.0)創(chuàng)建一個(gè)ActiveX(DLL)工程,將工程名字改為“COM_Test”
2、添加一個(gè)類(lèi)模塊,名稱(chēng)為“ClsAdd”,并輸入如下幾行代碼:
Option Explicit
Public x, y As Integer
Public Function myAdd() As Integer
myAdd = x + y
End Function
3、打開(kāi)“工程屬性”對(duì)話框,選擇“生成”,選中“自動(dòng)升級(jí)”;選擇“部件”,選中“遠(yuǎn)程服務(wù)器文件”(此點(diǎn)很重要,否則編譯時(shí)不會(huì)生成類(lèi)型庫(kù)文件COM_Test.TLB)及“二進(jìn)制兼容”,最后“確定”
4、保存并編譯,生成“Com_Test.dll”
5、打開(kāi)“控制面板/管理/組件服務(wù)”,在“COM+應(yīng)用程序”下利用“COM+應(yīng)用程序安裝向?qū)А眲?chuàng)建一個(gè)空的COM+應(yīng)用程序,名稱(chēng)為“MyTest”
6、在“MyTest”下,新建“組件”,在“組件安裝向?qū)А敝?,選擇“安裝新組件”(注意:不要使用“導(dǎo)入已被注冊(cè)的組件”),然后將第4步生成的Com_Test.dll及Com_Test.tlb都添加進(jìn)來(lái)(兩個(gè)文件都要!),完成。
7、右擊“COM+應(yīng)用程序”上方的“我的電腦”,選擇“屬性”,然后在“屬性”對(duì)話框中的“默認(rèn)屬性”頁(yè)下,將“默認(rèn)身份驗(yàn)證級(jí)”改為“無(wú)”,確定。
8、右擊“MyTest”,導(dǎo)出客戶端的“應(yīng)用代理”。注意:在導(dǎo)出對(duì)話框中,必須選擇“應(yīng)用程序代理”而不是“服務(wù)器應(yīng)用程序”!
9、將導(dǎo)出后的兩個(gè)文件(即應(yīng)用程序代理)安裝到win98機(jī)器上,此時(shí)它會(huì)在注冊(cè)表中添加幾處注冊(cè)項(xiàng),并在C:\program files\ComPlus Applications下產(chǎn)生一個(gè)以CLISD命名的文件夾,打開(kāi)來(lái)可看到Com_Test.tlb及Apl82.tmp二個(gè)文件。
注意:win98機(jī)器上是沒(méi)有Com_Test.dll文件的,該文件在win2000 server機(jī)器上!
好了,準(zhǔn)備工作至此結(jié)束,下面在win98機(jī)器上來(lái)驗(yàn)證你的COM+配置型組件能否工作。(先用Administrator及口令登錄)
10、啟動(dòng)VB(+sp5.0),創(chuàng)建一個(gè)exe工程,在窗體上放置一個(gè)文本框與一個(gè)命令按鈕,并在命令按鈕的Click事件中加入代碼:
Dim ox as object
set ox=createobject("Com_Test.ClsAdd","win2000 server 的IP地址")
ox.x=12
ox.y=13
text1.text=ox.myAdd()
執(zhí)行程序,win2000 server 機(jī)器的硬盤(pán)燈一陣閃爍之后,Text1中歡快地跳出“25”
---成功了!
以上經(jīng)驗(yàn)是在我經(jīng)過(guò)多次痛苦的失敗之后摸索出來(lái)的,看來(lái)靠別人不如靠自己。
后記:
1、此前,我對(duì)有關(guān)COM+的內(nèi)容可以說(shuō)是一片空白,什么都不懂,甚至也沒(méi)做過(guò)有關(guān)DCOM的試驗(yàn)。近來(lái)空閑,絡(luò)續(xù)看了點(diǎn)CSDN論壇中的提問(wèn)與回答,可沒(méi)有一個(gè)讓人滿意的。萬(wàn)不得已,自力更生。
2、個(gè)人以為,COM+組件并不一定要配置在主域控制器上,但必須配置在某個(gè)域中的某臺(tái)win 2000 Server上,而不是一般的2000 professional上(可能考慮到安全性)。
3、配置COM+組件不是在win98機(jī)器上的,而是在win 2000 Server上。比如,你在win98機(jī)器上安裝
應(yīng)用程序代理后,找不到相應(yīng)的DLL文件,只有TLB文件(類(lèi)型庫(kù)),該DLL文件在win 2000 Server上由Dllhost.exe來(lái)負(fù)責(zé)裝入內(nèi)存。
4、若是創(chuàng)建非配置型組件,則第一步中不是創(chuàng)建一個(gè)ActiveX(DLL)工程,而是ActiveX(EXE)工程,
因?yàn)樵揺xe文件在服務(wù)端不是由Dllhost.exe來(lái)負(fù)責(zé)裝入內(nèi)存,而是自行執(zhí)行。此種情形下,當(dāng)然也
就不需要第5至9步的操作了。
如提示,請(qǐng)注冊(cè)你調(diào)用的外部控件。
注冊(cè)win+R,
寫(xiě)入regsvr32 "帶完整路徑的文件",回車(chē)
很簡(jiǎn)單,點(diǎn)擊菜單“項(xiàng)目”--“WindowsApplication1屬性”
在屬性面板里點(diǎn)“資源”,這里可添加字符串資源、圖片資源、多媒體資源等等。
使用資源很簡(jiǎn)單,舉例如下:
? Label1.Text = My.Resources.String1
? PictureBox1.Image = My.Resources.小貓
點(diǎn)擊菜單:項(xiàng)目=》添加引用 彈出窗口后選擇“COM”項(xiàng),然后找到你要加載的控件。
記得先調(diào)用CMD使用 regsvr32 注冊(cè)你準(zhǔn)備加載的控件哈。
當(dāng)前名稱(chēng):包含vb.netcom加載的詞條
網(wǎng)頁(yè)網(wǎng)址:http://muchs.cn/article24/hphoje.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站策劃、網(wǎng)站排名、品牌網(wǎng)站設(shè)計(jì)、靜態(tài)網(wǎng)站、全網(wǎng)營(yíng)銷(xiāo)推廣、外貿(mào)網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)