title image


Smiley Warum sagt Access "Schreibgeschützt"
Hallo Zusamman,



was hab ich im unten stehenden Code falsch gemacht?

Ich bekomme alls Daten angezeigt, kann auch durchblättern.

Aber sobald ich versuche, sie zu ändern, bekomme ich die Meldung, das Formular sei schreibgeschützt. In den Formulareigenschaften steht "Bearbeitung zulassen" auf JA. der verwendete User (hier durch ****** anonymisiert) hat alle Rechte.



über hilfe würde ich mich freuen

Gruß

Jojo6



--------------------------------------------------

Option Compare Database

Option Explicit





Dim con As ADODB.Connection

Dim rs As ADODB.Recordset



Dim str_Connection As String





Private Sub Form_Load()



Set con = New ADODB.Connection

Set rs = New ADODB.Recordset



str_Connection = "Provider = OraOLEDB.Oracle;" & _

"User Id=*******;" & _

"Password=*******;" & _

"Data Source=*******;"



con.Open str_Connection



rs.Open "EMPLOYEES", con, adOpenStatic, adLockOptimistic



Set Me.Recordset = rs



txt_firstname.ControlSource = "FIRST_NAME"

txt_lastname.ControlSource = "LAST_NAME"

txt_email.ControlSource = "EMAIL"

txt_phonenummber.ControlSource = "PHONE_NUMBER"

txt_hiredate.ControlSource = "HIRE_DATE"

txt_salary.ControlSource = "SALARY"

txt_Commission.ControlSource = "COMMISSION_PCT"



End Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: