File Search And Download

[z0mgItsJohn]

This Little System Allows A User 2 Search And Download A File Form Your Website...

Source :

#Include <File.Au3>

Global $Download_Host

Func _Download_File ($File_Name, $File_Type, $Host)
$Download_Host = $Host
INetGet ($Download_Host & '/List.txt', @ScriptDir & '/List.txt')
Sleep ('500')
$Count = _FileCountLines (@ScriptDir & '/List.txt')
For $Array = '1' To $Count
$Read_Name = FileReadLine (@ScriptDir & '/List.txt', $Array)
If $Read_Name = $File_Name Then _Download ($Array, $Read_Name, $File_Type)
Next
EndFunc

Func _Download ($Line_Number, $File_Name, $File_Type)
INetGet ($Download_Host & '/Links.txt', @ScriptDir & '/Links.txt')
$Read_Link = FileReadLine (@ScriptDir & '/Links.txt', $Line_Number)
INetGet ($Read_Link, $File_Name & $File_Type)
EndFunc

Func OnAutoItExit ()
FileDelete (@ScriptDir & '/Links.txt')
FileDelete (@ScriptDir & '/List.txt')
EndFunc

All You Got 2 Do Is Add These Files 2 You Website..

List.txt : * DON'T ADD FILE TYPE AT THE END *

CODE

File 1

File 2

File 3

Links.txt :

CODE

http://www.webiste-here.com/file 1.file type

http://www.webiste-here.com/file 2.file type

http://www.webiste-here.com/file 3.file type

Make Since? xD

Enjoy

Feel Free 2 Post Comments Bug.. Etc.

[z0mgItsJohn]

Example :

#Include <_File_Download.Au3>

_Download_File ('Bid Tracker v1.0','.Au3','http://members.cox.net/data.base')

It Works

I Made It So You Can Kinda Have A File Data-Base From Auto-It

List.txt : * On http://members.cox.net/data.base *

CODE

Bid Tracker v1.0

Cool Calculator v1.0

Random Colors v1.0

Links.txt : * On http://members.cox.net/data.base *

CODE

http://members.cox.net/data.base/downloads/Bid%20Tracker%20v1.0.au3

http://members.cox.net/data.base/downloads...ator%20v1.0.au3

http://members.cox.net/data.base/downloads...lors%20v1.0.au3

Edited July 25, 2008 by John2006

[z0mgItsJohn]

Please Post Options ^^