VB語(yǔ)言與CST結(jié)合問(wèn)題
不知道此功能能否實(shí)現(xiàn),具體問(wèn)題描述如下
第一步:在電腦桌面(或者其他地方),創(chuàng)建.vbs文件,內(nèi)容大概是這樣的
打開(kāi)cst軟件-->創(chuàng)建工程-->保存(這些的實(shí)現(xiàn)語(yǔ)言在help里都可以查到,已解決,不再贅述), 并不關(guān)閉退出cst軟件!
第二步:仍然在電腦的桌面新建一個(gè).vbs文件
問(wèn)題就是想知道這個(gè)文件的內(nèi)容怎么寫(xiě),才能在點(diǎn)擊運(yùn)行的時(shí)候,讓上面已打開(kāi)的CST軟件響應(yīng)此腳本所要執(zhí)行的內(nèi)容,
感覺(jué)就是開(kāi)頭的語(yǔ)言不知道怎么寫(xiě),才能讓已打開(kāi)的CST軟件響應(yīng)
第三步:實(shí)現(xiàn)通過(guò)點(diǎn)擊電腦桌面上一系列的.vbs腳本文件來(lái)控制CST執(zhí)行一整套的動(dòng)作
不知道問(wèn)題描述清楚了沒(méi)有
請(qǐng)研究過(guò)vb的大俠們指導(dǎo),不勝感激!
問(wèn)題太冷,沒(méi)用過(guò)VB。
Option Explicit
Dim objStudio
Dim objProj
Set objStudio = CreateObject("CSTStudio.Application")
Set objProj = objStudio.NewMWS
' 等待一段時(shí)間。
WScript.Sleep(30000)
objStudio.Quit
打開(kāi)關(guān)閉功能只是。
大神終于出現(xiàn)了。想想辦法幫幫偶吧,項(xiàng)目急著用
本帖提到的人: @EDATOP
這些已經(jīng)都有了,雖然對(duì)問(wèn)題的解決沒(méi)有幫助,仍然很感謝你的回復(fù)
另外想問(wèn)一下還有沒(méi)有其他從外部控制CST的方法。
完全就不會(huì)VB怎么幫你?
Set objWshShell = WScript.CreateObject("WScript.Shell")
' 激活任務(wù)欄中應(yīng)用軟件窗口,參數(shù)即為任務(wù)欄顯示的軟件名稱(chēng)。
objWshShell.AppActivate("CST STUDIO SUITE")
不知道樓主是不是這個(gè)意思?