| |
Fragen und Antworten zur vbarchiv.dllOrdnerfreigabe nach FTP-Upload | | | Autor: rettench | Datum: 13.06.07 14:02 |
| Hallo zusammen,
ich habe mir die neueste vbarchiv.dll runtergeladen und habe folgendes Problem:
Nach dem binären übertragen von .txt Dateien auf einem FTP-Server mit ftpPutFile kann ich den Lokalen Ordner von dem die Dateien kopiert wurden nichtmehr löschen!
Das löschen ist erst nach dem Beenden des FTP-Upload-Programmes möglich.
Ich möchte jedoch den Ordner während dem das Programm ausgeführt wird mit RmDir löschen.
Der Source sieht wie folgt aus:
Public Function FTPupload()
Private mServer As String
Private mUser As String
Private mPassword As String
Private mSocket As Long
Dim strFTPDir As String
Dim strSourceFile As String
strSourceFile = "c:\temp\test.txt"
strFTPDir = "ftp...."
mSocket= ftpConnect(mServer, mUser, mPassword)
If mSocket < 1 Then
CallMsgBox "Kein Verbindungsaufbau zum FTP Server möglich. Fehler: " + _
CStr(ftpGetLastStatusCode()) & " - " & ftpGetLastStatusMsg()
Exit Function
End If
ftpSetBinary (mSocket)
Dim strFileName As String
strFileName = ffGetFileFromPath(strSourceFile)
Dim res As Long
res = ftpPutFile(mSocket, mServer, 0, strFTPDir + "/" + strFileName, _
strSourceFile)
If Not res = 1 Then
CallMsgBox "FTP Transfer von " + UCase(strSourceFile) + " ist" & _
"fehlgeschlagen! - " & _
"Fehler: " + CStr(ftpGetLastStatusCode()) & " - " & _
ftpGetLastStatusMsg()
Exit Function
End If
ftpQuit (pSocket)
End Function Kann mir bitte jemand weiterhelfen?
Vielen Dank
Mit freundlichen Grüßen
Christian
Christian Rettenbacher
Softwaredevelopement
EMCO Maier Ges.m.b.H.
Salzburger Strasse 80
5400 Hallein/Austria
Tel +43-62 45-8 91-516
Fax +43-62 45-86965
www.emco.at | |
Re: Ordnerfreigabe nach FTP-Upload | | | Autor: Björn Mankel | Datum: 23.06.07 07:45 |
| Moin,
wieso wird in der vbrachiv.dll das FTP nicht weiter entwickelt.
FTP ist doch eine gute Sache.
---
Sventke | |
| 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 |
|
|
Neu! sevCommand 4.0
Professionelle Schaltflächen im modernen Design!
Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 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
|
|