Moin
Ich würde gerne eine Trial Funktion in mein Programm einbauen.
Gedacht ist es so:
Bsp. hier hol ich Halt die Local TIme, Über den Hashcode in Hexadezimal umgewandelt, + ein paar FüllBuchstaben, damit der Code nicht zu leicht zu entschlüsseln ist.
Diesen String würd ich jetzt gerne "lokal" abspeichern, aber nicht unbedingt in einem extra file, (z.B. wie bei: "My.Computer.FileSystem.WriteAllBytes(Application.StartupPath & "\Tim.e", X, False)"), da man das ja einfach aufrufen könnte, zudem könnte man so dahinter kommen, wie das System funktioniert etc. pp.
Gibts eine Möglichkeit den String beim ersten Programmstart anzulegen, und dann danach immer nur noch zu überprüfen? also bei wiederaufrufen des Programmes, nur noch den String zu überprüfen, ob die Zeit abgelaufen ist?
Ich würde gerne eine Trial Funktion in mein Programm einbauen.
Gedacht ist es so:
VB.NET-Quellcode
- Dim Day = Hex(My.Computer.Clock.LocalTime.Day.GetHashCode)
- Dim Month = Hex(My.Computer.Clock.LocalTime.Month.GetHashCode)
- Dim Year = Hex(My.Computer.Clock.LocalTime.Year.GetHashCode)
- Dim Hour = Hex(My.Computer.Clock.LocalTime.Hour.GetHashCode + 2)
- Dim Min = Hex(My.Computer.Clock.LocalTime.Hour.GetHashCode)
- Dim Sec = Hex(My.Computer.Clock.LocalTime.Second.GetHashCode)
- TextBox4.Text = Day & "AD" & Month & "PE" & Year & "CE" & Hour & "EZ" & Min
Bsp. hier hol ich Halt die Local TIme, Über den Hashcode in Hexadezimal umgewandelt, + ein paar FüllBuchstaben, damit der Code nicht zu leicht zu entschlüsseln ist.
Diesen String würd ich jetzt gerne "lokal" abspeichern, aber nicht unbedingt in einem extra file, (z.B. wie bei: "My.Computer.FileSystem.WriteAllBytes(Application.StartupPath & "\Tim.e", X, False)"), da man das ja einfach aufrufen könnte, zudem könnte man so dahinter kommen, wie das System funktioniert etc. pp.
Gibts eine Möglichkeit den String beim ersten Programmstart anzulegen, und dann danach immer nur noch zu überprüfen? also bei wiederaufrufen des Programmes, nur noch den String zu überprüfen, ob die Zeit abgelaufen ist?
Danke!
Grüße,
Kevin
Grüße,
Kevin