[ÇóÖú]VB¿Ø¼þ¡°²»ÊÇÒ»¸öÒѼÓÔØµÄ¿Ø¼þÀࡱµÄ´íÎó£¿
ÐÐ 46: ¿Ø¼þ SSTab2 µÄÀà TabDlg.SSTab ²»ÊÇÒ»¸öÒѼÓÔØµÄ¿Ø¼þÀà¡£
ÐÐ 450: ¿Ø¼þ SSTab1 µÄÀà TabDlg.SSTab ²»ÊÇÒ»¸öÒѼÓÔØµÄ¿Ø¼þÀà¡£
ÐÐ 486: ¿Ø¼þ lstview_Pos_1 µÄÀà MSComctlLib.ListView ²»ÊÇÒ»¸öÒѼÓÔØµÄ¿Ø¼þÀà¡£
ÐÐ 514: ¿Ø¼þ lstview_Pos_2 µÄÀà MSComctlLib.ListView ²»ÊÇÒ»¸öÒѼÓÔØµÄ¿Ø¼þÀà¡£
ÐÐ 542: ¿Ø¼þ lstview_Pos_3 µÄÀà MSComctlLib.ListView ²»ÊÇÒ»¸öÒѼÓÔØµÄ¿Ø¼þÀà¡£
Çë½Ì¸ßÊÖÈçºÎ½â¾ö£¿
ÖØÐÂ×¢²áÒ»ÏÂÕâ¸öocx
regsvr32 c:\windows\system32\****.ocx
ÍùÍùµ±ÎÒÃÇÒÆ¶¯¶¯ÁËVBµÄÔ´ÎļþËùÔÚĿ¼ºó£¬Òƶ¯Ç°ºóocx¼ÓÔØµÄλÖÃÓб仯¾Í»á³öÏÖÉÏÃæËù˵µÄÇé¿ö£¬Ò»°ã˵À´£¬´Ó¹¤³Ì---²¿¼þ--ÕÒµ½Ô¿Ø¼þ----¹´Ñ¡---È·¶¨¾ÍÓ¦Äܽâ¾öÎÊÌâ¡£
¿Ø¼þûÓÐ×¢²á£¬»òÕ߿ؼþ²»´æÔÚ£¡
vb¾³£ÒýÓÃ×Ô¼º±àдµÄactive exe,active dll,ÆäËûÏÂÔØocx,ÔÚÏµÍ³ÖØ×°ºó,×¢²áµÄ¿Õ¼ä,Àà¾Í»áûÓÐ×¢²á,Ìáʾ²»ÄܼÓÔØ¿Õ¼ä,ÀàµÈ.
ÖØÐÂÔÚ²¿¼þ,ÒýÓÃÖÐ,¼ÓÔØ,ÒýÓÃÐèÒªµÄ¿Ø¼þ
ϵͳËÑË÷¼ÓÔØ¿Ø¼þ,active exe/dllËÑË÷×¢²á±í,ϵͳĿ¼,³ÌÐòËùÔÚĿ¼,ϵͳ±äÁ¿Ö¸¶¨µÄ·¾¶µÈ..
ÓùÜÀíԱȨÏÞ×¢²áÒ»ÏÂÏàÓ¦¿Ø¼þ.
ÄãµÄ¹¤³ÌûÄÜÕÒµ½ËùÐèÒªµÄ¿Ø¼þ£¬Õâ¸öÎÊÌâ¿ÉÄÜÊÇÄãµÄ¿Ø¼þ·¾¶²»¶Ô£¬»òÕßûÓÐ×¢²áÒýÆðµÄ
Ïà¹ØÎÊ´ð£º
ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
A 3
A 4
B 6
... ......