VB.Net-Forum - Beitragsübersicht -
ThemaV12: 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 ]
Antworten
V12: Keyfile - Inveritas 03. September 2015 um 12:01:46
Re: Keyfile - Nico 03. September 2015 um 12:06:43
Re: Keyfile - Inveritas 03. September 2015 um 18:21:35
Re: Keyfile - Nico 03. September 2015 um 18:38:14
Re: Keyfile - Inveritas 03. September 2015 um 19:03:02
Re: Keyfile - Nico 03. September 2015 um 19:06:10
Re: Keyfile - Inveritas 03. September 2015 um 19:20:23
Re: Keyfile - Nico 03. September 2015 um 19:25:51
Re: Keyfile - Inveritas 04. September 2015 um 07:00:46

Ihre Antwort
(Nick-)Name   Wichtige Informationen zur Namensangabe
E-Mail (opt.)  Wichtige Informationen zur Angabe einer eMail-Adresse
Thema   Wichtige Informationen zur Angabe eines Themas
Betrifft (IDE)  VB 2012
Ihre Antwort
Smilies
Mehr...
FettKursivUnterstrichen   Übersicht der Tipp-KürzelÜbersicht der Projekt-KürzelÜbersicht der Bücher-Kürzel 
Homepage
Titel
Root-Smilies              
             
             
[ Zurück zum VB.Net-Forum | Forum-Archiv | Forum-Hilfe | Chat ]

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB.Net | VB/VBA-Forum | DirectX | DirectX-Forum | Chat | Ausschreibungen | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum

Seite empfehlen Bug-Report
Letzte Aktualisierung: Sonntag, 13. Dezember 2015