×öÒ»¸ö·Ç³£¼òµ¥µÄä¯ÀÀÆ÷£¬Ê²Ã´¹¦ÄÜ£¬²å¼þ¶¼²»Òª£¬Ö»Òªµã»÷¾Í½øÈëÖ÷Ò³£¬»áµÄÈËÇëqqÁªÏµ£¬996985138
ʲô¹¦ÄÜ£¬²å¼þ¶¼²»Òª£º¾ÍÒ»¸öWebbrowser¿Ø¼þ¡£ÈçºÎ£¿
¿ÉÒÔ£¬Ö»Òªµã»÷£¬¾Í½øÈëÖ÷Ò³£¬²»¿¼ÂÇËùÓй¦ÄÜ
1.н¨Ò»¸öform
2.Ìí¼ÓÒ»¸öwebbrowser
3.Ìí¼ÓÒ»¸öbutton
4.button_click()Ìí¼Óʼþwebbrowser.navigate & ......
vbÁ¬½Ósql server²éѯ¿Ø¼þʱ¼ä¶Î
û¿´Ã÷°×lzʲôÒâ˼
¾ÙÀý˵Ã÷Ò»ÏÂ,ÎÊÌâÌ«Áýͳ,²»Ã÷°×Òâ˼
´ÓsqlserverÖа´Ê±¼ä¶Î²éѯ£¬±ÈÈç¿Ø¼þʱ¼ä·¶Î§1£º20£º30-5£º20£º06£¨×¢Ò⣺²»ÊDzéѯÈÕÆÚ£¬²éѯÈÕÆÚÓÃÕâ¸ö¾ä×Ó¿ÉÒԲ飬µ«ÊDzéѯʱ¼äÓÃÕâ¸ö¾ä×ӾͲ»ÐÐÁË£©
shi = "ʱ¼ä between '" + Str(DTPicker3.Value) + ......
VB code:
Private Sub Form_Load()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
cn.Open "Provider=OraOLEDB.Oracle.1;Persist Security Info=True;User Id=aaa;Password=aaa;Data Source=TEST;"
s ......
ÎÊÌâÃèÊö£º
×öÒ»¸ö¼òµ¥µÄä¯ÀÀÆ÷£¬Ç¶ÈëÒ»¸öÍøÒ³£¬ÓÃvbÉú³ÉexeÎļþ
[ÈçÉÏͼʾÀýÎļþ]
²»¿¼ÂÇä¯ÀÀÆ÷µÄËõ·Å
²»ÐèÒªÈκβå¼þ
Ö»ÐèÒªÍøÒ³Îļþ´ò¿ª¶¼ÊÇÔÚÕâ¸öexeÖ®ÄÚ£¬²»Ìø×ªµ½ie»òÆäËûä¯ÀÀÆ÷ÖУ¬
Çó´ïÈËָ·£¬¸øÔ´´úÂë¸üºÃ
ÔÚÏߵȣ¬ÈçÒªÏê̸£¬¼Óqq 996985138{{ ......
ÎÒÏÖÔÚÒѾÉú³ÉÁËexeÎļþÁË£¬ÈçºÎ½«ÈÃËüÏÔʾÎÒ×Ô¼ºµÄlogoÄØ
£¿
ÔÚÏߵȣ¬ÎҺܲ˵«ÊÇÎÒºÜŬÁ¦
¹¤³Ì——¡µÊôÐÔ——¡µÉú³É£¨Ñ¡Ï£©——¡µÓ¦ÓóÌÐò——¡µÍ¼±ê
LSÕý½â
ÎÒ°´ÕÕÂ¥ÉϵÄ˵·¨×öÁË£¬ÎÒÓõÄÊÇvb 6£¬ÆóÒµ°æµÄ£¬ÎÒµÄͼ±êÖ»ÓÐform1£¬Ã»ÓÐÓ¦ÓóÌÐò£¬ÇëÎÊÕâÊÇÎÒ´úÂëÎÊ ......
ÏîÄ¿»·¾³£ºvb6
ÎÊÌâÃèÊö£º
Éú³ÉµÄexeÎļþµÄlogo²»ÓÃϵͳlogo£¨ÕâÀïÖ¸µÄÊÇ×ÀÃæÉϵÄlogo£©£¬Èç¹ûÓдïÈËÖªµÀÇë½â´ð£¬Ð»Ð»
ÔÚÏߵȣ¡
ÓеãÔΣ¬½øÒ»²½½âÊÍ
exeÉÏ ÓÒ¼ü——¡µÊôÐÔ——¡µ¸ü¸Äͼ±ê¡¡
lzÊÇÖ¸Õâ¸öÂð£¿
Æäʵ³ÌÐòÀï¸ü¸Ä ´°ÌåµÄiconÊôÐ ......