Hallo Roeschti,
hier ist meine Testergebnisse, intensiv getestet mit 2 HTC und 1 Samsung Tablet.
Voraussetzung: Auf dem Windows-Rechner muss ein User erstellt werden und dieser User muss READ/Write-Rechte haben. Sonst fast nach jeder Befehl crasht Android-Clients.
smb.login
smb.login("192.168.254.2","erkan","erkanpasswort")
Login mit einem User ohne Probleme, ohne user und Passwort stützt die Android-Client ständig.
smb.isExist
Kann Dateien oder Verzeichnisse ohne Probleme kontrolieren. Hab keine Fehler feststellen können
Dim Ver1, Ver2 As Boolean
Ver1 = smb.isExist("smb://192.168.254.2/Backup/") 'TRUE
Ver2 = smb.isExist("smb://192.168.254.2/Backup") 'TRUE
Dim Dat1, Dat2 as Boolean
Dat1 = smb.isExist("smb://192.168.254.2/Backup/richtig.txt" 'TRUE
Dat2 = smb.isExist("smb://192.168.254.2/Backup/falsch12345.txt" 'FALSE
smb.createDir
User muss vorhanden und nötige Rechte haben, sonst crasch Android.
If smb.isExist("smb://192.168.254.2/Backup/bakalim/") = False Then
smb.createDir("smb://192.168.254.2/Backup/bakalim/")
End If
smb.getList
Liste der Shared-Inhalts und SubFolders sehe ich ohne Probleme, kann zugreifen oder ein Liste erstellen.
Dim LL As List
LL = smb.getList("smb://192.168.254.2/Backup/")
For i=0 To ll.Size -1
Msgbox (LL.Get(i),"") 'Name des List
Next
oder einzelne als Object zugreifen auch kein Problem:
Dim LL As List
Dim s as Object
LL = smb.getList("smb://192.168.254.2/Backup/")
s = LL.Get(2)
Msgbox(s,"2") 'Zeigt 2.
smb.copyTo
innerhalb eines Shares kopieren ist kein Problem. Musste nur Timeout einstellen, wenn ich über 1000 stk kleine Dateien kopieren möchte
smb.copyTo("smb://192.168.254.2/Backup/test.xml", "smb://192.168.254.2/Backup/test2.xml")
Mit Vorsichtig zu genissen, denn wenn die Target gleichen Name ist, dann crasht die Android.
smb.copyToLocal
Vom Shares nach Lokal kopieren dh zum Android-Gerät auch kein Problem.
smb.copyToLocal("smb://192.168.254.2/Backup/test.xml", File.DirRootExternal & "/test.xml")
smb.delete
Löschen die Dateien vom Server ist auch kein Problem, wenn der User nötige Rechte hat, sonst crasht die Android.
smb.delete ("smb://192.168.254.2/Backup/bakalim/")
smb.delete ("smb://192.168.254.2/Backup/test2.xml")
smb.checkDirectory
Die Verzeichnisse kann ich auch ohne Probleme kontrolieren.
Dim istDa1, istDa2, istDa3, istDa4 As Boolean
istDa1 = smb.checkDirectory("smb://192.168.254.2/Backup") 'TRUE
istDa2 = smb.checkDirectory("smb://192.168.254.2/Backup/") 'TRUE
istDa3 = smb.checkDirectory("smb://192.168.254.2/Backup/test1235.xml")
'FALSE -> Datei ist fake
istDa4 = smb.checkDirectory("smb://192.168.254.2/Backup/test.xml")
'FALSE -> Obwohl Datei vorhanden ist.
smb.getFileName
Was man damit machen kann, weiss ich nicht, funktioniert bei mir irgendwie nicht....
Also soweit ich gesehen habe, wenn man die Fehler empfangen kann, ist kein Problem...Am Anfang ohne User und Passwort hatte ich nur Probleme, aber mit einem User und Pass bis jetzt keine Probleme, funktioniort alles wie sein soll.
Danke und Viele Grüsse
erkaN kaplaN
