Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler 76. Nach
Autor: Gamer20
Datum: 08.06.03 10:11
Private Sub Command1_Click() IniDatei = App.Path & "\" & "Inidatei.ini" mDateiname = INIGetValue(IniDatei, "Dateineinstellungen", "rechner") If Not FileExists(mDateiname) Then LCF = "" With CommonDialog1 .FileName = LCF .DialogTitle = "Load rechner " .Filter = "rechner.exeFile(*.exe)|*.exe" .InitDir = App.Path .Flags = &H4 Or &H2 Or &H800 .DefaultExt = "*.exe" .CancelError = False .ShowOpen End With If CommonDialog1.FileName > "" Then LCF = CommonDialog1.FileName Else Exit Sub End If mDateiname = LCF Call INISetValue(IniDatei, "Dateineinstellungen", "rechner", mDateiname) sFile = mDateiname sPfad = Left$(sFile, InStrRev(sFile, "\")) If Right$(sPfad, 1) = "\" Then _ sPfad = Left$(sPfad, Len(sPfad) - 1) sPfad2 = sPfad + "\Profiles\" sPfad3 = sPfad + "\profiles\Profil.dat" If FileExists(sPfad3) = True Then Else FileCopy "Profil.dat", sPfad3 End If End If FileCopy "Aufgabe.dat", sPfad3 End Sub Das ist der gesamte Code der Clickprozedur. Bis zu End If End If Ist der Code zum auswählen und Profildatei kopieren, falls diese noch nicht im Profilordner vorhanden ist. Falls die Datei "Profil.dat" nicht vorhanden ist, dann wird diese kopiert und dann die "Aufgabe.dat"! sonst gleich FileCopy "Aufgabe.dat", sPfad3 . Wenn ich beider Exe manuell den Schreibschutz aktivierewird diese nicht manipuliert. Aber demUser das manuell machen zu lassen ist auch doof. Also im gorßen und ganzen hat sich das Problem dadurch leider nicht gelöst. Denn Da kommt die selbe Meldung, d.h. ich muß erst neu starten damit es klappt. Also kann ich auch erstmal meinen alten Code lassen. Trotzdem danke!

Pfad wählen - ok,direkt danach, datei kopieren - fehler 76. ...	1.031	Gamer20	07.06.03 07:20
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	746	dbayer	07.06.03 07:42
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	717	Gamer20	07.06.03 09:42
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	785	dbayer	07.06.03 10:16
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	827	Gamer20	07.06.03 21:12
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	700	dbayer	08.06.03 06:59
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	652	Gamer20	08.06.03 09:10
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	789	dbayer	08.06.03 09:15
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	708	Gamer20	08.06.03 10:11
Re: Pfad wählen - ok,direkt danach, datei kopieren - fehler ...	719	Gamer20	08.06.03 11:43

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen