Jump to content

Making an checker on ip


Recommended Posts

Hello,

I don't know how to explain this but i will try.

I'm making an checker that check ip's online(and maybe md5 encrypted).

Now im making it but it says always Holé but i mus says that it not can further.

And the ip adress must be stored in encryption but is doesn't it only stores _GetIP() :\.

Got it working but how do i set more of this ones:

[iPs]

op="rofl"

op="leet"

Maybe someone can help me

?

Greetings.

Edited by Venigo^
Link to comment
Share on other sites

Yes, you should check out IniWrite, it allows you to create keys inside a section, which is what you want I believe.

Don't take my pic to serious...~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~You Looked, but you did not see!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Link to comment
Share on other sites

Hello,

I don't know how to explain this but i will try.

I didn't follow your explanation below. Do you already have any code to post (working or not)?

I'm making an checker that check ip's online(and maybe md5 encrypted).

MD5 is a hash algorithm (like an extensive checksum), not an encryption. Did you mean you wanted to verify the file with the list of IPs using an MD5 hash? Or are you wanting the list to be really encrypted? Or have I complety missed the boat?

Now im making it but it says always Holé but i mus says that it not can further.

What is Holé in english (anything like Olé in Spanish)? Does this mean the script fails when you try to run it?

And the ip adress must be stored in encryption but is doesn't it only stores _GetIP() :\.

So you are getting IP addresses from somewhere (not clear where), and you want to save the list in an encrypted file, but it saves the name of your function instead? Or am I lost again?

Got it working but how do i set more of this ones:

[iPs]op="rofl"

op="leet"

Is this what you are writing to the encryted file, formatted like an .ini file? Those values are not IP addresses, so what are you (writing?, setting?) here, and where did it come from?

:D

Edited by PsaltyDS
Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
Share on other sites

....

Thats was a example.

But i want to get more ip's and then must it check the file encryption.ini if the ip is accepted in the log.ini.

But if i set more like this:

[iPs]

ip="127.0.0.1"

ip="222.222.222.222"

And in my encryption.

[iPs]

ip="1111.1111.111.111"

It's says always you can use this program.

For the ip lists i want something like this,

[ips]

ipadress1

ipadress2

etc

And i want it in my script to auto check if one is exactly like the ip in the encryption.ini

My script for now:

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

GUICreate("Cas Client Checker - Revolt", 293, 80)

$Label = GUICtrlCreateLabel("Do you want to check if you availble to launch cas client?", 10, 10)
$YesID  = GUICtrlCreateButton("Check", 50, 50, 50, 20)
GUICtrlSetOnEvent($YesID,"OnYes")
$IPID   = GUICtrlCreateButton("Get IP", 100, 50, 50, 20)
GUICtrlSetOnEvent($IPID,"OnIP")
$STARTID   = GUICtrlCreateButton("Run CASC", 150, 50, 60, 20)
GUICtrlSetOnEvent($STARTID,"onstart")
$ExitID = GUICtrlCreateButton("Exit", 210, 50, 50, 20)
GUICtrlSetOnEvent($ExitID,"OnExit")

GUISetOnEvent($GUI_EVENT_CLOSE,"OnExit")

GUISetState(); display the GUI

While 1
   Sleep (500)
WEnd


Func _GetIP()
    Local $ip
    If InetGet("http://therks.com/ip", @TempDir & "\~ip.tmp") Then
        $ip = FileRead(@TempDir & "\~ip.tmp", FileGetSize(@TempDir & "\~ip.tmp"))
        FileDelete(@TempDir & "\~ip.tmp")
        $ip = StringReplace($ip, "<html><head><title>Current IP Check</title></head><body>Current IP Address: ", "")
        $ip = StringReplace($ip, "<!-- proxy -->", "")
        Return $ip
    Else
        SetError(1)
        Return
    EndIf

EndFunc()

    
Func OnYes()
    
$ver = IniRead("log.ini", "IPS", "ipadress", 0)

$curr_ver = IniRead("encryption.ini", "IPS", "ipadress", 0)

If $ver > $curr_ver Then
MsgBox(0, "Hero Client Checker *CCC* - Revolit", "You can't use this program.", 10)

Else
    
MsgBox(0, "Hero Client Checker *CCC* - Revolit", "You can use this program.", 10)
EndIf

EndFunc()
    
    Func OnIP ()
            $PublicIP = _GetIP()
    if @GUI_CtrlId = $IPID Then
MsgBox(0, "IP Address", $PublicIP);works
    Else
MsgBox(0, "IP Address", $PublicIP);works
        Endif
    EndFunc()
    
    

While 1
    Sleep(500)
WEnd
    
Func onstart ()
    if @GUI_CtrlId = $STARTID Then
Run("msngr.exe");works

Exit
    Else
Run("msngr.exe");works

Exit
        Endif
EndFunc()

Func OnExit()
    if @GUI_CtrlId = $ExitId Then

    Else

    EndIf

    Exit
EndFunc()

;©Copyright 2006 By Venigo^!

I hope that u can help me.

Greetings.

Link to comment
Share on other sites

[Full Edit]

I'm now busy with the func on yes,

Func OnYes()
    

    InetGet("http://www.lima-cs.nl/lp/update.ini", "update.ini", 1)
    
$ver = IniRead("log.php", "IPS", "ipadress", 0)

$curr_ver = IniRead("encryption.php", "IPS", "ipadress", 0)

If $ver > $curr_ver Then
MsgBox(0, "Cas Client Checker *CCC* - Revolt", "You can't use this program.", 10)

Else
    
MsgBox(0, "Cas Client Checker *CCC* - Revolt", "You can use this program.", 10)


EndIf

EndFunc()

But i want something like this:

Func OnYes()
    


    
$ver = IniRead("log.php", "IPS", "ipadress", 0); want to check a full list and then if one is valid

$curr_ver = IniRead("encryption.php", "IPS", "ipadress", 0); here goes the client ip pass and login

If $ver > $curr_ver Then
MsgBox(0, "Cas Client Checker *CCC* - Revolt", "You can't use this program.", 10)

Else
    
MsgBox(0, "Cas Client Checker *CCC* - Revolt", "You can use this program.", 10)

Get ips{
Check ip login and pass{
Set parameter for launching option{
}}}

EndIf

EndFunc()

And then in log.php

[IPS]
ipadress1=127.0.01
ip2
ip3
;etc
[LOGINS]
login1=111
login2=2222
;etc
[PASSS]
pass1=1111
pass2=111
;etc

Greetz.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...