German ABFTP - lokaler FTP-Server

[juergen_pool]

Hallo zusammen,

wie kann ich mit der ABFTPLib einen FTP-Server im lokalen LAN (nicht über das Internet!) erreichen? Ich bekomme es mit IP oder Rechnername nicht hin. Kein Firewall-/Router-Problem, alle anderen Rechner im Netz können mit dem FTP-Server arbeiten, sowohl über Ethernet als auch über WLAN.

Die Alternativen (Freigaben, B4AServer) kenne ich, aber aus technischen Gründen brauche ich den lokalen FTP-Zugang.

Danke

Jürgen

 

[chris]

Hallo

Kannst du denn den FTP-Server so erreichen, z.B. mit dem "ES Datei Explorer" ?

Mit ABFTP funktioniert das bei mir so:

'Activity module
Sub Process_Globals
   'These global variables will be declared once when the application starts.
   'These variables can be accessed from all modules.
   Dim MyFTP As ABFTP
End Sub

Sub Globals
   'These global variables will be redeclared each time the activity is created.
   'These variables can only be accessed from this module.

End Sub

Sub Activity_Create(FirstTime As Boolean)
   myFTP.ABFTPConnect("192.168.1.80", 21, "user", "user")
   If myFTP.ABFTPConnected = True Then
     Msgbox("Connected", "")
     myFTP.ABFTPDisconnect()
   Else
     Msgbox(myFTP.ABFTPLastError, "")
   End If
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

 

[juergen_pool]

Gelöst

Hallo Chris,

Danke für die Rückmeldung. Mit der "nackten" IP so wie in deinem Beispiel ist alles ok. Ich war irritiert durch das Präfix "ftp." im Sample, das wurde ja sogar in der Textbox vorgegeben. Daher habe ich irrtümlicherweise angenommen, es sein ein fester und notwendiger Bestandteil der Adresse.

Gruß

Jürgen