000
19.11.2004, 15:54 Uhr
sXene[WARE]
|
Hi! Um mir das mit dem Dateien löschen zu vereinfachen habich mir ein kleines modul gebastelt. der code sieht so aus:
Visual Basic: |
Option Explicit
'+++++++++++++++++++++++++++++++' ' COPYRIGHT (C) 2004 by sXene ' '+++++++++++++++++++++++++++++++'
Public Function sXRemove(FileName As String, QuestionBox As Boolean)
If QuestionBox = True Then GoTo QuestionBoxSub Else Kill (FileName)
QuestionBoxSub: If MsgBox("Wollen Sie " & FileName & " wirklich löschen?", vbQuestion + vbYesNo, App.EXEName) = vbYes Then Kill (FileName)
End Function
|
Wennich jetz z.b. in meiner form
eingebe, soller die datei ohne zu fragen löschen.. wennich ,True mache dann soller mit ner YesNo msgbox danach fragen... mein prob: der zeigt die MsgBox IMMER an.. und der löscht die datei auch wennich auf "Nein" klicke..
kann mir da jemand sagen wies geht?? -- sXene.de
Dieser Post wurde am 22.11.2004 um 12:27 Uhr von FloSoft editiert. |