Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Mala pomoc oko koda za brisanje

[es] :: Access :: Mala pomoc oko koda za brisanje

[ Pregleda: 340 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Ljubisa kirovski
Skopje Makedonija

Član broj: 232882
Poruke: 30
*.cabletel.com.mk.



+1 Profil

icon Mala pomoc oko koda za brisanje06.09.2020. u 15:57 - pre 13 meseci
Pozdrav svima!
\molicu za pomoc oko koda za brisanje. Imeno imam na forme imam na On Load sledeci kod

Private Sub Form_Load()
Application.SetOption "Confirm Record Changes", 0
End Sub

Onda na On Delete sledeci kod

Private Sub Form_Delete(Cancel As Integer)
Dim SID As String
Dim rsc As DAO.Recordset
Set rsc = Me.RecordsetClone

SID = Me.Ispratnica_broj1.Value

Dim LResponse As Integer
LResponse = MsgBox(" Dali ste sigurni deka sakate da ja izbrišete Ispratnica br.: " & SID, vbYesNo + vbQuestion, "Brišenje?")
Response = acDataErrContinue
If LResponse = vbNo Then
DoCmd.CancelEvent
LResponse = MsgBox("Prekin na brišenje Isptatnica br.: " & SID, vbInformation, "Áðèøåœå?")
Me.Undo
End If
Set rsc = Nothing
End Sub


a na dugme Brishi koje se nalazi na forme imam postavjeno sledeci kod na On Click

Private Sub Command123_Click()
On Error GoTo Err_Command123_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Command123_Click:
Exit Sub

Err_Command123_Click:
MsgBox Err.Description
Resume Exit_Command123_Click

End Sub

Radi OK ali kad idem na otkazivanje brisanje pored moje poruke za otkazivanje kad zatvorim javi mi i Ms Access poruku "Jou canceled the previous operation". Moje pitanje za pomoc je:
1. Kako da je ostranim da se ne pojavlja MS Access poruka.
i josh jedno pitanje ako moze za pomoc
2. Dali mogu i kako u kodu na On Delite da dodam moju poruka kad se potvrdi brisanje od strane korisnika da se rekord brishe.
Ocekujem vashu pomoc i Hvala unapred


[Ovu poruku je menjao Ljubisa kirovski dana 06.09.2020. u 20:17 GMT+1]

[Ovu poruku je menjao Ljubisa kirovski dana 06.09.2020. u 20:29 GMT+1]
Lj.Kirovski
Prikačeni fajlovi
 
Odgovor na temu

Miki2013
Sarajevo

Član broj: 313952
Poruke: 68



+2 Profil

icon Re: Mala pomoc oko koda za brisanje06.09.2020. u 16:16 - pre 13 meseci
Isključite sistemske poruke.
DoCmd.SetWarnings False na početku izvršenja koda i
DoCmd.SetWarnings True na kraju izvršenja koda.

 
Odgovor na temu

Ljubisa kirovski
Skopje Makedonija

Član broj: 232882
Poruke: 30
*.cabletel.com.mk.



+1 Profil

icon Re: Mala pomoc oko koda za brisanje06.09.2020. u 19:28 - pre 13 meseci
Hvala Miki 2013 ubacio sam kao shto si naglasio na pocetku i na kraju izvrshavanje koda na Od Delete ali isto opet izbacuje Ms Access Poruku Jou Canceled the previous operation
Lj.Kirovski
 
Odgovor na temu

Miki2013
Sarajevo

Član broj: 313952
Poruke: 68



+2 Profil

icon Re: Mala pomoc oko koda za brisanje06.09.2020. u 22:17 - pre 13 meseci
Evo brzinski primjer i to je to ako sam Vas dobro shvatio.
Prikačeni fajlovi
 
Odgovor na temu

Ljubisa kirovski
Skopje Makedonija

Član broj: 232882
Poruke: 30
*.cabletel.com.mk.



+1 Profil

icon Re: Mala pomoc oko koda za brisanje06.09.2020. u 22:55 - pre 13 meseci
Hvala ti Puno Miki to je to radi

Lj.Kirovski
 
Odgovor na temu

[es] :: Access :: Mala pomoc oko koda za brisanje

[ Pregleda: 340 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.