vb調(diào)用net指令 vbnet function

在vb中使用shell調(diào)用net命令的用法怎么用？

Shell "cmd /c net view", vbNormalFocus 這樣就可以了不過DOS窗口只是一閃而過。

騰沖ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場景，ssl證書未來市場廣闊！成為創(chuàng)新互聯(lián)公司的ssl證書銷售渠道，可以享受市場價(jià)格4-6折優(yōu)惠！如果有意向歡迎電話聯(lián)系或者加微信：18980820575（備注：SSL證書合作）期待與您的合作！

請教在VB下如何取得shell來執(zhí)行net命令

寫一個函數(shù)

function nettime(ip)

open app.path "\nt.bat" for output as #1

print #1,"@net time \\" ip " nt.dat"

close #1

shell app.path "\nt.bat",vbhide

doevents

'這里你查查相關(guān)資料，關(guān)于shell的WAIT，可能用doevents不能等到執(zhí)行完成，所以可能得不到需要的數(shù)據(jù)， 里有資料

open app.path "\nt.dat" for intput as #1

dim x as sting

do until eof(1)

input #1,x

nettime=nettime x

loop

nettime=replace(nettime,vbcrlf,"")

nettime=replace(nettime," ","")

end function

調(diào)用就可以了，得到什么我不知道，沒有可用的服務(wù)器

vb 如何調(diào)用 NET寫的DLL?

VB.net語言

1、創(chuàng)建組件定義

新建一個Probject，在代碼中寫入：

Public Interface IDemo

Function Test() As String

End Interface

2、實(shí)現(xiàn)組件定義

新建一個Probject，添加對上述Probject的引用后，在代碼中寫入

Public Class Demo

Implements IDemo.IDemo

Public Function Test() As String Implements IDemo.IDemo.Test

Test = "Hello World!"

End Function

End Class

3、編譯出Demo.dll組件

4、使用.net的工具 Visual Studio .Net 2003 Command Prompt，輸入以下命令

Regasm Demo.dll /tlb:Demo.tlb

把Demo.dll注冊為一個com對象（這個com對象不等同于普通的用VB編寫的Com對象），并導(dǎo)出類型庫Demo.tlb

5、新建一個VB工程，添加對Demo.tlb和IDemo.tlb的引用

6、定義兩個全局變量

Dim vbDemo As Demo.Demo

Dim vbIDemo as IDemo.IDemo

7、在Form_Load事件中初始化

'初始化實(shí)體類

Set vbDemo = New Demo.Demo

'將實(shí)體類引用到抽象類

Set vbIDemo = vbDemo

8、然后，我們就可以用 vbIDemo.Test 這樣的方法了

文章名稱：vb調(diào)用net指令 vbnet function
文章鏈接：http://muchs.cn/article16/dospggg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供微信小程序、網(wǎng)站設(shè)計(jì)、動態(tài)網(wǎng)站、網(wǎng)站內(nèi)鏈、移動網(wǎng)站建設(shè)、外貿(mào)建站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)