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

VB ADODCÐÞ¸ÄÊý¾Ý

ÇëÎÊÏÂÀûÓÃADODC¿Ø¼þÈçºÎÐÞ¸ÄÊý¾Ý¿âµÄijһ¸öÖµ£¿ÎÒÔÚÀûÓÃÎı¾°ó¶¨Êý¾Ý¿âµÄÇé¿öÏÂÏÔʾ³öÊý¾Ý£¬µ«ÊÇÔÚÐÞ¸ÄÆäÖеÄijһ¸öÖµµÄʱºò£¬ÀûÓà           Adodc1.Recordset.Update 
                        Adodc1.Refresh ´úÂë¸üб£´æ£¬È´·¢ÏÖûÓб£´æÁË£¬ÊÇʲôԭÒò£¿¸ÃÈçºÎ½â¾öÄØ£¬Çë´óÏÀÖ¸½Ì
Adodc1.Recordset.addnew
Adodc1.Recordset.fields("name").value="ÕÅÈý"
Adodc1.Recordset.fields("age").value=30
Adodc1.Recordset.Update 
Adodc1.Refresh

лл£¬ÎÒÂíÉϸĴúÂëÊÔÏÂ

´óÏÀ£¬ºÃÏñʵ¼ÊÉϲ»¿ÉÐУ¬ÎÊÌâÊÇÕâÑùµÄ£¬ÎÒÓÐÒ»¸öÎı¾°ó¶¨Êý¾Ý¿â£¬ÄÚÈÝÊÇ´òÓ¡´ÎÊý£¬ÔÚÎÒµãÏ´òÓ¡µÄʱºòÕâ¸öÎı¾ÀïÃæµÄÊý×Ö×Ô¶¯Ôö¼Ó1£¬Ö®ºó±£´æµ½Êý¾Ý¿â£¬¾Í¸ÄÕâÒ»¸öµØ·½£¬Ö¸½ÌÏ£¬´ó¸ç£¬¸ø¸ö´úÂ룬лл

ÎÒÊÔ¹ý£¬Ã»ÎÊÌâ
VB code:
Option Explicit

Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=microsoft.jet.oledb.4.0;data source=E:\Access DB\Database1.mdb;"
Adodc1.RecordSource = "select top 1 ÊýÁ¿ from T1"
Adodc1.Refresh
End Sub

Private Sub Command1_Click()
Text1.Text = Val(Text1.Text) + 1
Adodc1.Recordset.addnew
Adodc1.Recordset.fields("ÊýÁ¿").Value = Val(Text1.Text)

Adodc1.Recordset.Update
Adodc1.Refresh
End Sub


лл£¬ÎÊÌâ½â¾öÁË


Ïà¹ØÎÊ´ð£º

vbÄÜ·ñ°Ñwinsock¿Ø¼þ·â×°µ½dllÖÐ

vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......

vb Å£Âð - Web ¿ª·¢ / vbScript

vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£

±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......

100·Ö£¡¹ØÓÚvbµ÷ÓÃdelphi±àдµÄdllµÄÎÊÌ⣬¼±£¡£¡£¡

¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......

Çë¸ßÊÖ°ï¿´¿´Õâ¸övb¸ÃÔõô×ö£¬Ð»Ð»

Õâ¾ä»°ÎÒ²»Ì«Ã÷°×£¬vbÔ´Âë¸ÃÔõô×ö£¿Ð»Ð»
ÖÆ×÷Ò»¸öupdate.exeרÃÅÓÃÀ´Éý¼¶£¬Ö´ÐÐÕâ¸öupdateµÄʱºò£¬³ÌÐòʹÓÃapiº¯ÊýURLDownloadToFile½«http://update.8888.cn/MiniDor/version.iniÏÂÔØÏÂÀ´£¬È»ºóÓ뵱ǰ°æ±¾±È½Ï°æ± ......

¹ØÓÚVB.NETºÍMS ACCESSµÄÎÊÌâ

ÎÒдÁËÒ»¸öÈí¼þ£¬ÒªÓõ½ACCESSÊý¾Ý¿â£¬ÎÒÔÙ·ÃÎÊACCESSµÄʱºò£¬ÎÒÐèÒª´Ó±íÀï¶Á³öÒ»ÐÐÊý¾Ý£¬ÎҵijÌÐòÊÇÕâÑùдµÄ£¬SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ