vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: datei kopieren mit hilfe einer variablen bzw. inidatei! 
Autor: Gamer20
Datum: 03.05.03 14:58

Private Sub copy_Click()
IniDatei = App.Path & "\" & "Inidatei.ini"
Pfad = INIGetValue(IniDatei, "Dateineinstellungen", "rechner")

If Right$(Pfad, 1) <> "\" Then Pfad = Pfad & "\"
test = Pfad & "profil.dat"
FileCopy "test.dat", test

End Sub

das ist der Code für den Button zum Kopieren.


Das ist der Code zum wählen und speichern des Pfades.

Option Explicit

Dim mDateiname As String
Dim Pfad As String
Dim TaskID As Long
Dim IniDatei As String
Dim test As String

Public Function FileExists(ByVal sFile As String) As Boolean

'Der Parameter sFile enthält den zu prüfenden Dateinamen

Dim Size As Long
On Local Error Resume Next
Size = FileLen(sFile)
FileExists = (Err = 0)
On Local Error GoTo 0
End Function


Private Sub ok_Click()
Dim TaskID As Long
IniDatei = App.Path & "\" & "Inidatei.ini"
Pfad = INIGetValue(IniDatei, "Dateineinstellungen", "rechner")

If FileExists(Pfad) = True Then
Else
On Local Error Resume Next
With CommonDialog1
.Filter = "*.*|*.*"
.CancelError = True
.ShowOpen
On Error Resume Next
If Err = 0 Then
Pfad = .FileName
Call INISetValue(IniDatei, "Dateineinstellungen", "rechner", Pfad)
End If
End With
End If
mDateiname = Pfad
TaskID = Shell(mDateiname, vbNormalNoFocus)


Soll ich dir mal das Testprogramm zusenden?

Ist eigentlich nur ein Forumlar mit 2 Button.


Der Pfad stimtms auf jeden Fall.

Daich ihn habe mir ausgeben lassen in einem Label als "inizialisierung"

Also ist die Variable doch nicht leer wie ich dachte. Dachte ich muß den Pfad in eine Array schreiben!
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
datei kopieren mit hilfe einer variablen bzw. inidatei!561Gamer2003.05.03 10:48
Re: datei kopieren mit hilfe einer variablen bzw. inidatei!461Marcus W03.05.03 11:21
Re: datei kopieren mit hilfe einer variablen bzw. inidatei!433Gamer2003.05.03 12:15
Re: datei kopieren mit hilfe einer variablen bzw. inidatei!431Gamer2003.05.03 14:58
Re: datei kopieren mit hilfe einer variablen bzw. inidatei!431Gamer2004.05.03 10:08

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel