Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: filecopy
~`Mhz`~




Typ: neutral
Postów: 40
Zarejestrowany: Jan 2003
filecopy

jak zrobić takie coś
filecopy app.path & "\" & app.exename, "D:\"
chodzi o to aby kopiował własny plik w dane miejsce

23-04-2003 14:34
Pokaż profil ~`Mhz`~  Wyślij email do ~`Mhz`~   Odwiedź stronę ~`Mhz`~  
hicks
raptor user



Typ: moderator
Postów: 279
Zarejestrowany: Apr 2003

jeżeli się nie mylę to powinno być tak:

' KOD PROGRAMU
If App.Path <= 3 Then ' zabezpieczenie bo mogło by być tak: c:\\program.exe
' i w win 9x i me wywali błąd...
FileCopy App.Path & App.EXEName & ".exe", "d:\nazwa.exe"
Else
FileCopy App.Path & "\" & App.EXEName & ".exe", "d:\nazwa.exe"
End If
' KONIEC KODU

oczywiście najpierw należy skompilować programik
to powinno działać (u mnie działa)


_____________________________________________
TLHW Clan member

26-04-2003 20:35
Pokaż profil hicks  Wyślij email do hicks   Odwiedź stronę hicks       2511367
hicks
raptor user



Typ: moderator
Postów: 279
Zarejestrowany: Apr 2003

O sorry mała pomyłka... powinno być

' KOD PROGRAMU
If Len(App.Path) <= 3 Then ' zabezpieczenie bo mogło by być tak: c:\\program.exe
' i w win 9x i me wywali błąd...
FileCopy App.Path & App.EXEName & ".exe", "d:\nazwa.exe"
Else
FileCopy App.Path & "\" & App.EXEName & ".exe", "d:\nazwa.exe"
End If
' KONIEC KODU

Przepraszam za kłopot


_____________________________________________
TLHW Clan member

28-04-2003 15:30
Pokaż profil hicks  Wyślij email do hicks   Odwiedź stronę hicks       2511367
~`Mhz`~




Typ: neutral
Postów: 40
Zarejestrowany: Jan 2003

sprawdze zaraz

28-04-2003 16:53
Pokaż profil ~`Mhz`~  Wyślij email do ~`Mhz`~   Odwiedź stronę ~`Mhz`~  
Wszystkich odpowiedzi: 3 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1