VB 呼叫 QuickTestpro 指令碼

2021-09-09 03:42:51 字數 740 閱讀 8361

摘選自:

今天幫乙個加拿大的朋友解決vb呼叫qtp的問題,自己寫了乙個demo 。

下邊是源**

1.新建工程,引入quicktest professional 8.0 object library

2.編寫**如下:

private strscriptname as string

private strrunscript as string

private sub cmdaddscript_click()

strscriptname = inputbox("請輸入quicktestpro指令碼的路徑以及名字", "select script")

lstqtpscript.additem strscriptname

strscriptname = ""

end sub

private sub cmdrunscript_click()

strrunscript = ""

end if

end sub

private sub form_load()

strscriptname = ""

strrunscript = ""

end sub

private sub lstqtpscript_click()

strrunscript = lstqtpscript.text

end sub

以上**在vb6.0 winxp sp2除錯通過。

vb呼叫儲存過程

public sub procexe byval procname as string,byval pch as string dim cn as adodb.connection dim cmd as adodb.command cn.connectionstring cn.open set cm...

vb呼叫vc dll檔案

關於dll的建立與呼叫使用vc 的嚮導即可。具體操作如下 開啟選單 file new 選擇 projects win32 dynamic link library 選擇 a dll project 即可。這時系統會自動生成3個檔案 cpp,stdafx.cpp,stdafx.h。之後將入口函式dll...

VB呼叫儲存過程

dim adocomm as new adodb.command dim prmretval as adodb.parameter dim prmid as adodb.parameter adocomm.activeconnection conn adocomm.commandtype adcmd...