Exetools  

Go Back   Exetools > General > General Discussion

Notices

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #6  
Old 06-09-2020, 23:16
niculaita's Avatar
niculaita niculaita is offline
Family
 
Join Date: Jun 2011
Location: here
Posts: 1,475
Rept. Given: 1,009
Rept. Rcvd 95 Times in 65 Posts
Thanks Given: 5,429
Thanks Rcvd at 508 Times in 359 Posts
niculaita Reputation: 95
how to avoid start activation during 30 trial days and after that using an unic code changing next ?

Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
Dim num As Integer
Dim num2 As UInt32
Dim num3 As UInt32
Try
If (MySettingsProperty.Settings.Culture.Length > 0) Then
Thread.CurrentThread.CurrentUICulture = New CultureInfo(MySettingsProperty.Settings.Culture)
End If
Catch exception1 As Exception
Dim ex As Exception = exception1
ProjectData.SetProjectError(ex)
Dim exception As Exception = ex
ProjectData.ClearProjectError
End Try
Me.Localize
Me.KSVE = New KSVE4Class
Me.KSVE.Initialize(-1281006)
Me.KSVE.FindActivation(num, num2, num3)
If ((num <> 0) And (num <> &H100)) Then
Me.RunActivationApplication
MyBase.Close
Else
Me.voice = New SpeechSynthesizer
Me.ComboBox1.Items.Clear
Dim voice As InstalledVoice
For Each voice In Me.voice.GetInstalledVoices
Me.ComboBox1.Items.Add(voice.VoiceInfo.Name)
Next
If (Me.ComboBox1.Items.Count > 0) Then
Me.ComboBox1.SelectedIndex = 0
End If
End If
End Sub
__________________
Decode and Conquer
Reply With Quote
 


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Import OS Fixing MaRKuS-DJM General Discussion 31 07-16-2004 23:20
Fixing an EXE to not call a DLL? Barry General Discussion 11 06-03-2004 00:37


All times are GMT +8. The time now is 23:40.


Always Your Best Friend: Aaron, JMI, ahmadmansoor, ZeNiX, chessgod101
( Since 1998 )