Frage : Störung kompilieren „kann nicht zuweisen, um nur Eigentum zu lesen“

Störungs„kann nicht zuweisen, um nur Eigentum "

Highlighted kompilieren auf

zu lesen! btno = RecvKKL! btno

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
Private VorcmdMove_Click ()
    
Auf Störungs-Zusammenfassung zunächst

    Command12.Enabled = falsch
    
    Option1.Enabled = falsch
    Option2.Enabled = falsch
    
    Moving_Rec (InputBox („die Protokoll-Zahl eingeben“))

Unterseeboot beenden


Privates VorMoving_Rec (lsno als Doppeltes)

'Auf Störung Goto- NGPErrPara:
  
Schwaches RsCounter als neues ADODB.Recordset
Schwaches BNo

Text1 (18) .text = lsno
  
'''''''''' Anschluss für Mover.MDB Akte für bringendaten von Trant.MDb zu Mover.MDB
    Wenn RecvKKL_Cnn.State = 1 dann RecvKKL_Cnn.Close
        RecvKKL_Cnn.Open „Provider=Microsoft.Jet.OLEDB.3.51; Datenquelle =“ u. App.Path u.“ \ Mover.mdb; Strahl OLEDB: Datenbank Password=xxxxxxxxxxxxx "

''''''''' Lokales Recordset, das an B_Detail anschließt
    
    Wenn RecvLCL.State = 1 dann RecvLCL.Close
        RecvLCL.Open „* von B_Detail IN DEM LsNo =“ u. Text1 (18) .text u. „und Überprüfung = 1“, Betrug, das adOpenKeyset vorwählen, adLockOptimistic
        
        
    Wenn RecvKKL.State = 1 dann RecvKKL.Close
        RecvKKL.Open „wählen * von B_Detail“, RecvKKL_Cnn, das adOpenKeyset vor, adLockOptimistic

    Wenn RecvKKL! btno > 0 dann
        BNo = RecvKKL! btno

        Mit RecvLCL
        
            .AddNew
        
            ! btno = RecvKKL! btno
            ! Modus = RecvKKL! Modus

Antwort : Störung kompilieren „kann nicht zuweisen, um nur Eigentum zu lesen“

Wo wird RecvLCL erklärt? Ich sehe es nirgends, aber es kann eine globale Variable sein. Ist es als ADODB.Recordset erklärt worden?





Weitere Lösungen  
 
programming4us programming4us