Jump to content
Sign in to follow this  
Zibit

(FTP) get data

Recommended Posts

Zibit

now im working on a private server (non - PHP ) and is it possibol ?:

REGISTRAION:

*Gets a Username and password from email or smth

*runs a sertain program (does the installing itself)

*and pastes them into the program ?

PLEASE HELP I RELLY NEED THIS !!!

Better way:

or something like chat connection...

make 2 input boxes

*USERNAME

*PASSWORD

AND SENDS DATA TO HOST WHO TRANSFERS DATA TO THE PROGRAM ?

This is better way If you have a script that reminds that then please share !

Edited by Zibit

Share this post


Link to post
Share on other sites
Zibit

i have the base script for sender but i need a reciver who tranfer the data....

#include <GUIConstantsEx.au3>

Opt('MustDeclareVars', 1)

_Main()

Func _Main()
    Local $filemenu, $fileitem, $recentfilesmenu, $separator1
    Local $exititem, $helpmenu, $aboutitem, $okbutton, $cancelbutton
    Local $msg, $file
    #forceref $separator1

    GUICreate("Kal-Black Register Script", 300, 200)

    $filemenu = GUICtrlCreateMenu("File")
    $fileitem = GUICtrlCreateMenuItem("Open...", $filemenu)
    $recentfilesmenu = GUICtrlCreateMenu("Recent Files", $filemenu)
    $separator1 = GUICtrlCreateMenuItem("", $filemenu)
    $exititem = GUICtrlCreateMenuItem("Exit", $filemenu)
    $helpmenu = GUICtrlCreateMenu("?")
    $aboutitem = GUICtrlCreateMenuItem("About", $helpmenu)
    $okbutton = GUICtrlCreateButton("OK", 50, 130, 70, 20)
    $cancelbutton = GUICtrlCreateButton("Cancel", 180, 130, 70, 20)
    GuiCtrlCreateInput("", 10, 15, 130, 20)
    GuiCtrlCreateInput("", 10, 45, 130, 20)
    GuiCtrlCreateLabel("Username", 150, 15, 150, 130)
    GuiCtrlSetColor(-1,0xff0000)
    GuiCtrlCreateLabel("Password", 150, 45, 150, 130)
    GuiCtrlSetColor(-1,0xff0000)
    GUISetState()

    While 1
        $msg = GUIGetMsg()


        Select
            Case $msg = $GUI_EVENT_CLOSE Or $msg = $cancelbutton
                ExitLoop

            Case $msg = $fileitem
                $file = FileOpenDialog("Choose file...", @TempDir, "All (*.*)")
                If @error <> 1 Then GUICtrlCreateMenuItem($file, $recentfilesmenu)

            Case $msg = $exititem
                ExitLoop

            Case $msg = $okbutton
                MsgBox(0, "Click", "You clicked OK!")

            Case $msg = $aboutitem
                MsgBox(0, "About", "Kal-Black Register File")
        EndSelect
    WEnd

    GUIDelete()

    Exit
EndFunc  ;==>_Main

Share this post


Link to post
Share on other sites
PsaltyDS

i have the base script for sender but i need a reciver who tranfer the data....

If you need someone to write it for you, please see the Rent-A-Coder link in my sig. If you have tried to write the "receiver" and it didn't work, please post the code and ask a more specific question.

^_^


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

Share this post


Link to post
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
Sign in to follow this  

×