Kh?c ph?c: "Đ?i tư?ng không h?p l? ho?c không c?n đ?t" l?i v?i Microsoft Jet

ID c?a bài: 304536
Bung t?t c? | Thu g?n t?t c?

TRI?U CH?NG

Khi m? và đóng c?a các k?t n?i ho?c recordsets b?ng cách s? d?ng tr?nh đi?u khi?n ODBC Microsoft Access ho?c các Microsoft OLE DB Provider cho máy bay ph?n l?c, l?i sau đây có th? đư?c báo cáo:
Đ?i tư?ng không h?p l? ho?c không c?n đ?t.
Sau khi l?i này báo cáo, không có nhi?u recordsets ho?c các k?t n?i có th? đư?c m? ra t? quá tr?nh.

Thông đi?p l?i có th? khác thông báo là ?ng d?ng khách bao g?m:
Quá nhi?u b?ng m?.
Không th? m? b?t k? bàn nhi?u hơn n?a.

GI?I PHÁP

Đ? gi?i quy?t v?n đ? này, cài đ?t Microsoft ph?n l?c 4,0 service pack m?i nh?t 6. Để biết thêm thông tin, bấm vào số bài viết sau để xem bài viết trong Cơ sở Kiến thức Microsoft:
239114Làm th? nào đ?: Có đư?c gói d?ch v? m?i nh?t cho cơ s? d? li?u Microsoft Jet 4,0

T?NH TR?NG

Microsoft đ? xác nh?n r?ng đây là m?t v?n đ? trong các s?n ph?m c?a Microsoft đư?c li?t kê ? đ?u bài vi?t này. V?n đ? này đ? đư?c c? đ?nh trong máy bay ph?n l?c 4,0 Service Pack 6 (SP6).

THÔNG TIN THÊM

Đ? t?o l?i v?n đ?, h?y ch?y sau Microsoft Visual Basic for Applications (VBA) code:
Public Sub Jet_TableID_Repro()
Dim conn As ADODB.Connection
Dim cmd As ADODB.Command
Dim rs As ADODB.recordset
Dim i As Long
    
    Set conn = New ADODB.Connection
    ' Modify this connection string to point to some blank database.
    conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\YourTestDatabase.mdb;"
    
    ' Drop and re-create test query.
    On Error Resume Next
    conn.Execute "drop procedure sp_param_test", , adExecuteNoRecords
    On Error GoTo 0
    conn.Execute "create procedure sp_param_test as " & _
                 "parameters iInput Long; " & _
                 "select iInput as iOutput;", , adExecuteNoRecords
    
    For i = 1 To 10000

        ' Code should fail at around 2000-3000 iterations.
        Set rs = New ADODB.recordset
        Set cmd = New ADODB.Command
        Set cmd.ActiveConnection = conn
        cmd.CommandType = adCmdStoredProc
        cmd.CommandText = "sp_param_test"
        cmd.Parameters.Append cmd.CreateParameter("iInput", adInteger)
        cmd.Parameters(0).value = 12

        ' This will fail at around 2000-3000 iterations.
        rs.Open cmd, , adOpenKeyset, adLockOptimistic
        Set cmd = Nothing
        Debug.Print i
        DoEvents
        rs.Close
        Set rs = Nothing

    Next i

End Sub
				

Thu?c tính

ID c?a bài: 304536 - L?n xem xét sau cùng: 27 Tháng Tám 2011 - Xem xét l?i: 2.0
T? khóa: 
kbhotfixserver kbqfe kbjet kbprb kbmt KB304536 KbMtvi
Máy d?ch
QUAN TRỌNG: Bài vi?t này đư?c d?ch b?ng ph?n m?m d?ch máy c?a Microsoft ch? không ph?i do con ngư?i d?ch. Microsoft cung c?p các bài vi?t do con ngư?i d?ch và c? các bài vi?t do máy d?ch đ? b?n có th? truy c?p vào t?t c? các bài vi?t trong Cơ s? Ki?n th?c c?a chúng tôi b?ng ngôn ng? c?a b?n. Tuy nhiên, bài vi?t do máy d?ch không ph?i lúc nào c?ng hoàn h?o. Lo?i bài vi?t này có th? ch?a các sai sót v? t? v?ng, cú pháp ho?c ng? pháp, gi?ng như m?t ngư?i nư?c ngoài có th? m?c sai sót khi nói ngôn ng? c?a b?n. Microsoft không ch?u trách nhi?m v? b?t k? s? thi?u chính xác, sai sót ho?c thi?t h?i nào do vi?c d?ch sai n?i dung ho?c do ho?t đ?ng s? d?ng c?a khách hàng gây ra. Microsoft c?ng thư?ng xuyên c?p nh?t ph?n m?m d?ch máy này.
Nh?p chu?t vào đây đ? xem b?n ti?ng Anh c?a bài vi?t này:304536
Khước từ Nội dung trong Cơ sở Kiến thức Không còn được hỗ trợ
Bài vi?t này nói v? các s?n ph?m mà Microsoft không c?n h? tr? n?a. Do đó, bài vi?t này đư?c cung c?p "nguyên b?n" và s? không đư?c c?p nh?t.

Cung cấp Phản hồi