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

Access ¶ÔÏóÒѹرÕ,²Ù×÷²»ÔÊÐí!

Public Rs As New ADODB.Recordset
Public Conn As New ADODB.Connection

Private Sub Command1_Click()
    Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb;Persist Security Info=False"
    Rs.CursorLocation = adUseClient
    Rs.Open "Select * from Tm", Conn, adOpenKeyset, adLockOptimistic
End Sub

Private Sub Command2_Click()
    Msgbox Rs.RecordCount ÕâÀï¾ÍÏÔʾ¶ÔÏóÒѹرÕÁË
End Sub

ÓôÃÆÁËÒ®£¬ÄÇλ¸ßÊÖ°ïæ¿´¿´£¡
Ìù³öµÄ´úÂëûÓÐÎÊÌ⣬Ӧ¸ÃÆäËûλÖÃÓÐÎÊÌ⣬¿´ÆäËûλÖÃÊÇ·ñÓйرÕ

Public Rs As New ADODB.Recordset
Public Conn As New ADODB.Connection

Private Sub Command1_Click()
    Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb;Persist Security Info=False"
    Rs.CursorLocation = adUseClient
    Rs.Open "Select * from Tm", Conn, adOpenKeyset, adLockOptimistic
    Rs.MoveFirst
    Rs.MoveLast
    MsgBox Rs.RecordCount

End Sub

Ïȵ¥»÷Command1
È»ºóµ¥»÷Command2


Public Rs As New ADODB.Recordset
Public Conn As New ADODB.Connection
*********************************
Õâ¸ö¶¨ÒåÔÚ¹«¹²Ä£¿éÀïÂð£¿

Òª±£Ö¤±äÁ¿Ã»Ó


Ïà¹ØÎÊ´ð£º

asp¸úAccessÊý¾ÝÁ¬½ÓÎÊÌâ¡£

IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)

'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
S ......

Access²éÕÒÖظ´ÎÊÌâ - ÆäËûÊý¾Ý¿â¿ª·¢ / Access

ÎÒÓÃAccessÊý¾Ý¿â×öÁËÒ»¸öͼÊéÊý¾Ý¿â£¬ÀïÃæÓÐÒ»¸ö×Ö¶ÎÊÇISBN£¬¾ÍÊÇISBNºÅ£¬µ«ÊÇÖ»µÄÒ»×Ü·ÖͼÊéдµÄISBNºÅ£¬ÓеÄûд£¬Ð´µÄÄÇÒ»²¿·ÖÓеÄISBNÊÇÖظ´µÄ£¬ÄÜ·ñÓÃSQLÓïÑÔ°ÑÖظ´µÄ¹ýÂ˵ô£¬µ«Ã»Ð´ISBNºÅµÄͼÊé²»ÄܹýÂ˵ô£¬È ......

ÔõÑùÇå³ýACCESS»º´æ

ÔõÑùÇå³ýACCESS»º´æ
ACCESS°æÓеãÀäÇå
Õâ¸öÄÄλ¸ßÈË»á
СµÜ¼±ÓÃ
²»»á SORRY

»°ËµÂ¥Ö÷ ÎÒÔÚSQLµÄµÚÒ»¸öÎÊÌⶼÊÇÄã½â¾öµÄ ллÄã ÎÒÓ¡ÏóÉî¿Ì

ÒýÓÃ
²»»á SORRY

»°ËµÂ¥Ö÷ ÎÒÔÚSQLµÄµÚÒ» ......

ΪɶÎÒ²åÈëaccessÊý¾Ý¿âÓÐÎÊÌâ

string connectionString = ConfigurationManager.AppSettings["ConnectionString"];
        string sql = "insert into times(time) values('" + DateTime.Now + ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ