30. december 2001 - 22:11Der er
3 kommentarer og 1 løsning
Msgbox hvis feltet ikke er udfyldt
Jeg vil gerne have en msgbox op hvis feltet \"kunstner\" ikke er udfyldt, når jeg sletter en post. Jeg har brugt følgende kode, som virker hvis feltet Kunstner er udfyldt, men skal så fejlmelde hvis ikke. Håber der er hjælp derude :-)
Private Sub Slet_Click() Dim Navn As String Dim msg As String, Svar As Integer Navn = Adodc1.Recordset(\"Kunstner\") msg = \"Slet CD:\" & Chr$(13) & Chr$(13) msg = msg & Navn & Chr$(13) & Chr$(13) msg = msg & \"Er du helt sikker?\" Svar = MsgBox(msg, vbOKCancel, \"Slet CD\") If Svar = vbOK Then Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext End If End Sub
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
Private Sub Slet_Click() Dim Navn As String Dim msg As String, Svar As Integer Navn = Adodc1.Recordset(\"Kunstner\") If Navn = \"\" Then MsgBox \"Der er en fejl\" Exit Sub End If msg = \"Slet CD:\" & Chr$(13) & Chr$(13) msg = msg & Navn & Chr$(13) & Chr$(13) msg = msg & \"Er du helt sikker?\" Svar = MsgBox(msg, vbOKCancel, \"Slet CD\") If Svar = vbOK Then Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext End If
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.