Access & VBA (UPD, DEL records)

[ezechiel]

Hallo iedereen,

ik probeer records te verwijderen en up te daten, maar dat lukt gewoonweg niet.
Toevoegen gaat wel...

De tabel bevat twee kolommen : een id en naam.

De werkwijze moet gaan als volgt:
DELETE
de gebruiker kiest de waarde die verwijderd moet worden in een combobox,
en dan klikt ie op een knopje om de actie uit te voeren. Dit is de code:

Private Sub bt_del_DI_grp_Click()
Dim str_del_DI_grp As String

On Error GoTo Err_bt_del_DI_grp_Click

    DoCmd.GoToRecord , , acGoTo
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
    
    str_del_DI_grp = "DELETE FROM DI_DOMAIN_GROUP WHERE DI_grp_name LIKE '" & Me.cb_del_DI_grp.ValidationText & "';"
    DoCmd.RunSQL str_del_DI_grp

Exit_bt_del_DI_grp_Click:
    Exit Sub

Err_bt_del_DI_grp_Click:
    MsgBox Err.Description
    Resume Exit_bt_del_DI_grp_Click
    
End Sub

Hij antwoord : "delete 0 rows?" ?? :shocked: ??
of de fout nu zit bij de waarde van de combobox of nog ergens anders, dat weet ik niet.
Ik weet ook niet of die "acGoTo" juist is..
Ik ben dan ook een newbie in VBA

Some help please.
Ik ga nu effe proberen voor die update.

Alvast bedankt
BTW: dit is redelijk dringend. So please help!!

 

[WinteE]

DELETE * FROM

leek mij eerst het proberen waard.

 

[ezechiel]

Ik weet niet of dat zo gaat in access, maar in oracle of zo moet je zetten

DELETE FROM

WHERE [de record(s) die je wil]

Als je de tabel in een keer wilt wissen, zet je gewoon

TRUNCATE TABLE

Maar doet er nu niet toe
Ik heb het ondertussen gevonden:
in die combobox zaten de id EN de naam. En door gewoon '.Value' te nemen, nam hij
de waarde in de eerste kolom, de id dus (terwijl ik de naam opzocht in de query).
Nu werkt het.

By the way, wat moet je zetten om de waarde van de tweede kolom te nemen?

Maar ik zit nog met een probleem bij die update:

Ik heb de code nu niet maar ik zal die er maandag bijzetten.
Het is ongeveer dezelfde VB code als de delete en add.

Ik heb dus een combobox waaruit je een keuze maakt van de waarde die je wil updaten.
Dan heb je een textbox waar je de nieuwe waarde kan invullen.

Hier is het probleem:
Eens je op de update knop duwt, komt er nog een ander venstertje:
in het venstertje staat text en een textbox.
De text is de waarde die ingevuld werd in de eerste textbox (en die staat niet 'in' die tweede textbox).

Maar nu moet je die waarde nu nog eens typen.
Als je dan op ok klikt, doet hij de update.
Dus het lukt, maar niet zoals ik wil...

Enig idee?