|
最新文章
|
知識(shí)管理交流
→『 技術(shù)文檔交流 』
本版文數(shù)：9505 今日文數(shù)：4081
|
|
這個(gè)class主要用于操作asp中的xmlhttp。首先是類(lèi)定義Cls_AspHttp.asp：<%=================================================================飛揚(yáng)遠(yuǎn)程獲取類(lèi)(AspHttp)1.0.1Bate1By奔騰的心2006-04-19...
|
|
********************************************************************************名稱(chēng)：遠(yuǎn)程抓取函數(shù)作用：利用XMLHTTP遠(yuǎn)程抓取數(shù)據(jù)參數(shù)：sMethod---發(fā)送方式sUrl------目標(biāo)地址iMode-----返回內(nèi)容類(lèi)型：0為二進(jìn)制...
|
|
==================================================函數(shù)名：ReplaceSaveRemoteFile作用：替換、保存遠(yuǎn)程圖片參數(shù)：ConStr------要替換的字符串參數(shù)：SaveTf------是否保存文件，F(xiàn)alse不保存，True保存參數(shù):TistUrl----...
|
|
==================================================函數(shù)名：GetHttpPage作用：獲取網(wǎng)頁(yè)源碼參數(shù)：HttpUrl------網(wǎng)頁(yè)地址==================================================FunctionGetHttpP...
|
|
在大多數(shù)情況下，上網(wǎng)沖浪是件令人愉快的事情。但若是數(shù)百上千的超鏈接擺在你面前，而你又不得不一一點(diǎn)擊這些鏈接、進(jìn)入相應(yīng)的網(wǎng)頁(yè)、手工篩選出每頁(yè)里你需要的信息、最后再將這些信息編進(jìn)數(shù)據(jù)庫(kù)中、....，你將做何感想？如果每天都從事這種繁雜、枯燥的工作會(huì)不會(huì)讓你發(fā)瘋?“自動(dòng)上網(wǎng)機(jī)器人”或許可救你出“苦海”：你可以喝著咖啡、聽(tīng)著音...
|
|
OptionExplicitPrivateDeclareFunctionSendMessageLibuser32AliasSendMessageA(ByValhwndAsLong,ByValwMsgAsLong,ByValwParamAsLong,lParamAsAny)AsLongPrivateConstTV_FIR...
|
|
win7刪除一個(gè)空白文件夾總是顯示：找不到該項(xiàng)目，該項(xiàng)目不在e盤(pán)中，請(qǐng)確認(rèn)該項(xiàng)目的位置，然后重試。怎么辦？[img]http://a.ikafan.com/image/smiley/default/12.gif[/img][img]http://a.ikafan.com/image/smiley/default/12....
|
|
1、獲得瀏覽器信息：PrivateSubCommand1_Click()WebBrowser1.Navigatehttp://www.applevb.comEndSubPrivateSubCommand2_Click()DimoWindowDimoNavSetoWindow=WebBrowser1.Document.p...
|
|
setobjdoc=webbrowser1.document[br]objdoc.getelementsbytagname(input)(0).value=name[br]objdoc.getelementsbytagname(input)(1).value=password[br]objdoc.getelements...
|
|
我的vb程序有很多form，每個(gè)form里有很多command，我想按一個(gè)按鈕之后，讓所有的command的enabled屬性都為true，這個(gè)怎么實(shí)現(xiàn)呢？對(duì)于已經(jīng)可以看見(jiàn)的窗體，可以用下列代碼：VisualBasiccode?123456789101112131415PrivateSubCommand1_Click(...
|
|
比如用到了一個(gè)swf文件，如何在生成可執(zhí)行文件時(shí)包含它，注意：不是制作安裝程序!我用的是vb6.0可以把你的代碼解釋下嗎？我是新手！制成資源文件：1、（菜單欄）外接程序——外接程序管理器——加載VB6資源編輯器2、點(diǎn)菜單欄下的綠色圖標(biāo)調(diào)出資源管理器3、點(diǎn)添加自定義資源（在問(wèn)號(hào)左邊）4、選擇保存好的文本文檔，OK！調(diào)出該...
|
|
我想要在VB窗口中設(shè)一按鈕，點(diǎn)擊之后，能調(diào)用另一程序，并且該程序不會(huì)出現(xiàn)它自己的程序窗口，而是在VB主窗口中顯示，也就是調(diào)用程序后直接就把程序顯示在VB的窗口中，這該如何才能實(shí)現(xiàn)，望高手們幫幫忙啊~~謝謝ljl88900的回答，按你的做法可以實(shí)現(xiàn)在窗口里打開(kāi)程序，但如果要把打開(kāi)的程序固定在VB主窗口的中間，該怎么做？另...
|
|
ListBox1.Items.Add(...)貌似LISTBOX每個(gè)ITEM的TEXT和VALUE的值是一樣的如果用ListBox1.Items.Add(...)來(lái)增加列表項(xiàng)的話(huà)怎么分別設(shè)置它的text和value??------解決方案--------------------ListBox1.Items.Add(ne...
|
|
就是我在listbox中合并了信息寫(xiě)入了，在怎么拿出來(lái)寫(xiě)入分開(kāi)啊！因?yàn)槲蚁氚阉谥饤l展示！謝謝代碼:PrivateSubForm_Load()DimiAsLongWithList1Fori=1To9.AddItemi&*&i*i&.ListCountNextiEndWithEndSubPriva...
|
|
在TEXTBOX里面每輸入一個(gè)字符，listbox就自動(dòng)搜索相似的內(nèi)容類(lèi)似VB幫助那種效果用Instr函數(shù)就可以實(shí)現(xiàn)您要的程式。PrivateSubText1_Change()Fori=0ToList1.ListCount-1IfInStr(1,List1.List(i),Text1.Text,vbTextCompar...
|
|
OptionExplicitPrivateTypeTPointxAsLongyAsLongEndTypePrivateTypeTVHITTESTINFOptAsTPointflagsAsLonghItemAsLongEndTypePrivateTypeTVITEMmaskAsLongHTreeItemAsLongsta...
|
|
建窗體，窗體放置1個(gè)ComBox,命名為cbDrive，1個(gè)ListBox,命名為lstMain，一個(gè)CommandButton,命名為cmdGo,添加如下代碼:DimhAsclsMainInfoPrivateSubcmdGo_Click()DimhTAsLongDimuW()AsByteDimdW()AsByteDi...
|
|
OptionExplicitPrivateSubCommand1_Click()ResumeNextDimMsgValueAsStringDimobjWMIServiceAsObjectDimobjItemAsObject,colItemsAsObjectSetobjWMIService=GetObject(winmg...
|
|
在窗體中插入一個(gè)WebBrowser1，然后在代碼頁(yè)寫(xiě)入：DimStatusTextAsStringPrivateSubForm_Load()WebBrowser1.Navigatehttp://moqie.clicksun.cnEndSubPrivateSubWebBrowser1_NewWindow2(ppDisp...
|
|
得到當(dāng)前browser的頁(yè)面字體內(nèi)容PublicFunctiongetWebContent()FunctiongetWebContent(browserAsWebBrowser)AsStringDimdocAsObjectDimiAsObjectDimstrHtmlAsStringSetdoc=browser.Docu...
|
|
為什么用WebBrowser控件的LocationName方法顯示出來(lái)的是地址而不是標(biāo)題呢？PrivateSubCommand1_Click()W.Navigate(Text1.Text)EndSubPrivateSubW_StatusTextChange(ByValTextAsString)Label2.Captio...
|
|
我有webbowser做了一個(gè)瀏覽器，但每次在點(diǎn)擊webbrowser中的超鏈接時(shí)，卻是用IE打開(kāi)的新窗口，請(qǐng)問(wèn)怎么才能捕獲webbrowser中鼠標(biāo)的單擊事件.假定你的窗體叫Form1PrivateSubWebBrowser1_NewWindow2(ppDispAsObject,CancelAsBoolean)Set...
|
|
如題，我就是想做一個(gè)仿軟件，在VB窗體里面載入另外一個(gè)程序，當(dāng)我運(yùn)行窗體的時(shí)候另外一個(gè)程序也會(huì)一起啟動(dòng)，但是另外一個(gè)程序要它隱藏，我應(yīng)該怎么做？求助，人格保證，絕對(duì)不是Mu馬，只是單純的想做一個(gè)仿軟件！謝謝，在線(xiàn)等，或者加QQ交流，！Shell另外程序打開(kāi)的路徑,VBHide不用分開(kāi)打包的，在vb里面有個(gè)工具很好用，“...
|
|
下面給你的代碼是百分之百可以連接成功的，它也是我正在使用中的代碼片段哦。PrivateSubCommand1_Click()DimcnAsNewADODB.Connection創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象DimrsAsNewADODB.Recordset創(chuàng)建表對(duì)象DimstrCnAsString連接字符串Dimdb_hostAsSt...
|
|
怎么讓生成VB程序執(zhí)行文件只在后臺(tái)運(yùn)行？只能在進(jìn)程中看到1,窗體的ShowInTaskBar值設(shè)為False2,在Form_Load事件中，添加App.TaskVisible=False3,窗體的Visible屬性設(shè)為False
|
400 186 1886
