|
VB.Net-Forum - Beitragsübersicht - |
|
Thema | V12: Keyfile |
Von |
Inveritas |
Datum |
03. September 2015 um 12:01:46 |
Frage |
Guten Morgen,
ich wollte gerne ein Keyfile System in mein Programm einbauen.
es sollte nach Möglichkeit wie folgt ablaufen:
Programm starte, fragt ob die File bzw der Eintrag exestiert. (egal ob txt oder xml )
wenn ja: passiert nix ( Programm läuft ) wenn nein: Schließt sich das Programm
die File würde auf einem Server liegen, und den pfad würde ich gerne über my.settings laufen lassen
liebe grüße, Inveritas
|
|
Antwort: |
Von |
Inveritas |
Datum |
03. September 2015 um 18:21:35 |
Antwort |
diese warriante sagt mir nicht zu, da sie die datei downloaded :(Dim WithEvents client As New Net.WebClient Private Sub Form1_Load(...) Handles MyBase.Load client.DownloadFileAsync(New Uri("http://adresse.de/dateiamserver.txt"), "C:\Datei.txt") End Sub Private Sub client_Completed() Handles client.DownloadFileCompleted Dim Inhalt = IO.File.ReadAllText("C:\Datei.txt") If Inhalt.Contains("Text") Then ' Datei enthält den String "Text" Else ' Datei enthält den String "Text" nicht End If End Sub Die hier sah sehr schnittig aus, nur hatte ich keine ahnung wie ich damit weiter verfahren sollte :-/'Declaration Public Shared Function Exists ( _ path As String _ ) As Boolean die hier sah am vielversprechendsten aus, nur des mit der ID und dem PW ... wobei ich da auch schon an ne ht.access file gedacht hatte ^^Private sClient As New Net.WebClient sClient.Credentials = New Net.NetworkCredential("Benutzername", "Passwort") 'Überprüfe , ob der Ordner verfügbar ist Dim request As Net.FtpWebRequest = Net.FtpWebRequest.Create("ServerPfad") request.Method = Net.WebRequestMethods.Ftp.ListDirectory request.Credentials = New Net.NetworkCredential("Benutzername, Passwort") Try ServerRersponse = request.GetResponse() ServerRersponse.Close() 'Alles funktioniert wie gewünscht: Catch ex As Exception ServerRersponse.Close() 'Fehler RemoteServer Exit Sub End Try mit welcher könnte ich denn am besten arbeiten, das sie meinen wünschen entspricht ? ^^
asso, muss keine log in funktion haben, geht auch ohne :D
Grüße, Inveritas |
|
[ Antwort schreiben | Zurück zum VB.Net-Forum | Forum-Hilfe ] |
|
Letzte Aktualisierung: Sonntag, 13. Dezember 2015 |
|