Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

µ÷ÊÔJavaScript/VB Script½Å±¾³ÌÐò£¨Wscriptƪ£©

ÔÚÈÕ³£µÄ²Ù×÷ϵͳά»¤¹ý³ÌÖУ¬ÓÐʱÎÒÃÇÒ²»áдһЩСµÄ½Å±¾³ÌÐòÀ´¼ò»¯ÏµÍ³¹ÜÀí¹¤×÷£¬ÀýÈçµ÷ÓÃһЩWMIº¯ÊýÀ´×Ô¶¯°²×°Ð¶ÔسÌÐòÖ®ÀàµÄ¡£
ÔÚʵ¼Ê¹¤×÷ÖУ¬ÎÒ·¢ÏÖ³ÌÐòÔ±¶Ô½Å±¾±§Ô¹×î¶àµÄ¾ÍÊǽű¾³ÌÐòºÜÄѵ÷ÊÔÕâ¸öȱµã£¬ÌرðÊǵ÷ÊÔ.vbsµÈWSH³ÌÐòµÄʱºò£¬×ÜÊÇ£º
1.       ÔÚ×ÊÔ´¹ÜÀíÆ÷ÀïÃæË«»÷Ò»¸ö.vbsÎļþ¡£
2.       ³ÌÐòÀïÃæ·¢ÉúÁËÒ»¸ö´íÎó£¬ÀýÈçÒì³££¬»òÕß±à³ÌÂß¼­´íÎó¡£
3.       Ò»ÐÐÐÐÔĶÁÔ´Îļþ£¬È»ºóÔÚ¹À¼Æ·¢Éú´íÎóµÄµØ·½£¬Ìí¼ÓºÜ¶àµÄMsgbox.Show£¬´òӡһЩ±äÁ¿µÄÖµ¡£
4.       ÖØÐÂÖ´ÐÐ.vbsÎļþ
5.       “µ±µ±µ±”£¬Ò»ÏµÁÐµÄ “È·¶¨”µãÍêÁËÒÔºó£¬ÈËÒ²ÔÎÁË£¬ÖØÐ»ص½µÚÈý²½¼ÌÐø……
ÆäʵÎÒÃÇÒ²ÊÇ¿ÉÒÔÓÃVisual Studioµ÷ÊÔÕâÀàWSH³ÌÐòµÄ£¬¹Ø¼ü¾ÍÔÚ.vbsµÈWSH½Å±¾³ÌÐòµÄ½âÊÍÆ÷wscript.exeºÍcscript.exeÌṩÁ˵÷ÊÔÖ§³Ö£º
1.       µ±ÎÒÃÇÔÚ×ÊÔ´¹ÜÀíÆ÷ÀïÃæË«»÷Ò»¸ö.vbsÎļþʱ£¬×ÊÔ´¹ÜÀíÆ÷ʵ¼ÊÉÏÊÇÔËÐÐwscript.exeÀ´½âÊͺÍÖ´ÐÐÕâ¸ö.vbsÎļþµÄ¡£
2.       Wscript.exeºÍcscript.exe¶¼Ö§³ÖÕâÁ½¸öÑ¡Ïî /D – ÆôÓõ÷ÊÔ¹¦ÄÜ£¬/X – ÔÚµ÷ÊÔÆ÷ÀïÃæÖ´Ðнű¾³ÌÐò¡£
ÕâÑù£¬ÎÒÃÇ¿ÉÒÔʹÓÃÁ½ÖÖ·½·¨ÔÚVisual StudioÀïÃæµ÷ÊԽű¾³ÌÐò£¬ÕâÀïÎÒÖ»½éÉܵڶþÖÖ·½·¨ -- µÚÒ»ÖÖ·½·¨²»ÖªµÀΪʲôÎÒµÄWin 7 + Visual Studio 2008²»Äܹ¤×÷£¬:(¡£
ÀýÈçÏÂÃæµÄ.vbs´úÂ룬½«Ëü±£´æµ½c:"test.vbs£¬ÎÒÃÇÒªµ÷ÊÔÕâ¸ö³ÌÐò£¬Ô´ÎļþÈçÏ£º
Set obj = CreateObject("System.Collections.ArrayList")
obj.Add("this is a test")
obj.Add(1)
obj.Add(obj)
 
Msgbox obj(0)
Msgbox obj(1)
Msgbox obj(2).ToString()
 
1.       ´ò¿ªÃüÁîÐУ¬¸ü»»Ä¿Â¼µ½C:ÅÌ£¬Ö´ÐÐÏÂÃæÕâ¸öÃüÁ
Wscript.exe /X test.vbs
2.       Õâ¸öʱºò£¬Ó¦¸Ã»áµ¯³öÒ»¸öVisual Studio¶Ô»°¿ò£¬ÌáʾÄãÑ¡ÔñºÏÊʵĵ÷ÊÔÆ÷£¬Ö±½Óµã»÷ÉÏÃæµÄÈ·¶¨°´Å¥¾ÍºÃÁË¡£
3.       ×îºó£¬Äã¾Í¿ÉÒÔ¸úµ÷ÊÔC#»òÕßC++³ÌÐòÒ»Ñù£¬ÔÚ  Visual StudioÀïÃæÉèÖöϵ㣬²é¿´±äÁ¿µÄÖµÁË£¬ÈçÏÂͼËùʾ£º
  


Ïà¹ØÎĵµ£º

oracle¿Í»§¶ËÅäÖÃÓëʹÓã¨vb£©

   ʹÓÃoracleÊý¾Ý¿âÓÐÁ½ÖÖ·½·¨£º                   
1¡¢ÔÚ¿Í»§¶Ë»úÆ÷Éϰ²×°oracleµÄ¿Í»§¶ËÈí¼þ¡£Î¨Ò»µÄÀýÍâ¾ÍÊÇjavaÁ¬½ÓÊý¾Ý¿âµÄʱºò£¬¿ÉÒÔÓÃjdbc thinģʽ£¬²»ÓÃ×°oracleµÄ¿Í»§¶ËÈí¼þ¡£
2¡¢Èç¹ûÄãÔÚ»úÆ÷É ......

VBÖÐÈçºÎÉùÃ÷¼°Ê¹ÓöàάÊý×é,¶à²ãÊý×é¼°¶¯Ì¬Êý×é

ÉùÃ÷¹Ì¶¨´óСµÄÊý×é  
  ÓÐÈýÖÖ·½·¨ÉùÃ÷¹Ì¶¨´óСµÄÊý×飬ÓÃÄÄÒ»ÖÖ·½·¨È¡¾öÓÚÊý×éÓ¦ÓеÄÓÐЧ·¶Î§£º    
  ½¨Á¢¹«ÓÃÊý×飬ÔÚÄ£¿éµÄÉùÃ÷¶ÎÓà   Public   Óï¾äÉùÃ÷Êý×é¡£  
  ½¨Á¢Ä£¿é¼¶Êý×飬ÔÚÄ£¿éµÄÉùÃ÷¶ÎÓà   Private   Óï¾äÉùÃ÷Êý×é¡£  
  ½¨ ......

VBÖеÄUnicode ºÍ Ansi ¸ñʽ ת»»


 VBÖеÄUnicode ºÍ Ansi ¸ñʽ
    Visual Basic 32-bit °æ±¾µÄ×Ö´®´¦Àí²ÉÓà Unicode£¬Ò²¾ÍÊÇ˵×Ö´®ÔÚ VB ÄÚ²¿ÊÇÒÔUnicode µÄ¸ñʽÀ´´æ·Å¡£ºÎν Unicode£¿¼òµ¥µÄ˵£¬¾ÍÊÇÿһ¸ö×Ö·û¶¼ÊÇÒÔ 2-byte µÄÐÎʽ±íʾ£¬¶øÃ¿¸ö¡¸ÊµÌå×Ö·û¡¹¾ÍÊÇÒ»¸ö¡¸×Ö·û¡¹¡£Òò´Ë£¬
 Len("´ó¼ÒºÃ")
 Len("abc")
& ......

vb ´òÓ¡

 Private Sub PrintTxt(txt As String, ConWidth As Long, LeftPosition As Long)
    Dim str As String
    Dim str1 As String
    Dim len1 As Long
   
    str = txt
    len1 = ConWidth
  &nbs ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ