Jump to content

Pioneer5250

Members
  • Posts

    16
  • Joined

  • Last visited

About Pioneer5250

  • Birthday 05/15/1980

Profile Information

  • Location
    Central Coast, Australia

Pioneer5250's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. This script is awsome... Great job!! i was just thinking what about turning it into a screen saver.
  2. Try this! $sUsername = InputBox("Enter Username","Please enter the required username!",""," ","-1","130","-1","-1") $sPassword = InputBox("Enter Password","Please enter the users password!","","*","-1","130","-1","-1") $sGroup = InputBox("Enter Group","Please enter the required group!",""," ","-1","130","-1","-1") Run(@ComSpec & ' /k net user ' & $sUsername & ' ' & $sPassword & ' /add', @SystemDir, @SW_HIDE) Sleep(1000) Run(@ComSpec & ' /k net localgroup ' & $sGroup & ' ' & $sUsername & ' /add', @SystemDir, @SW_HIDE)
  3. You could add this into your loop! If WinExists('Windows Task Manager') Then WinClose('Windows Task Manager') EndIf
  4. Try a search for editable listview, I know I came across one a while back.
  5. try this! $aRead = IniReadSection('test.ini', 'SECTION') If Not IsArray($aRead) Then _Func() For $i = 1 To $aRead[0][0] MsgBox(0,'',$aRead[$i][0] & '=' & $aRead[$i][1]) Next Func _Func() MsgBox(0,'','Nothing in section') EndFunc
  6. Listed in the appendix in the help file under asci characters it says 2d for - and 3d for =
  7. Hi Diana, From what I understand checking if the process exists should work for queing the scanning programs. To get the programs to scan the selected directory or file, search for command line options in the programs help file to see if they support scanning individual Files/Directories. And finally to launch your script and parse the current File/Directory you might be able to use something in MHz's CMenu http://www.autoitscript.com/forum/index.ph...57&hl=cmenu There are options in there that have to do what you are talking about like Execute with parameters, Path to clipboard etc. So once you can determine what the selected File/Directory is then you could run the app with those parameters. Hope this helps!
  8. try this: RegWrite("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce", "MicrosoftJavaRemovalCleanup", "REG_SZ", '"C:\Temp\AppDeploy\Jre_1.4.2.13\MicrosoftJavaRemovalCleanup.exe"') this will add surround the app in "", in my experience they are required for the program to launch.
  9. found this topic here http://www.autoitscript.com/forum/index.ph...6294&hl=x64 SmOke_N wrote a function to dtermine what os is running maybe something like this might help Dim $ProgramFilesDir If _OSBit2() = 64 Then $ProgramFilesDir = @HomeDrive & "\Program Files (x86)" Else $ProgramFilesDir = @HomeDrive & "\Program Files" EndIf If FileExists($ProgramFilesDir & "\adobe\adobe after effects 7.0") Then ;Code EndIf Func _OSBit2() Local $tOS = DllStructCreate("char[256]") Local $aGSWD = DllCall("Kernel32.dll", "int", "GetSystemWow64Directory", "ptr", DllStructGetPtr($tOS), "int", 256) If IsArray($aGSWD) And DllStructGetData($tOS, 1) Then Return 64 Return 32 EndFunc
  10. is $data being updated properly before the loop and how do you update $data with the value "err" while in the loop
  11. teres a GuiCtrlGetState function if that helps
  12. Send("{VOLUME_UP}") Send("{VOLUME_DOWN}")
  13. Still looking myself for a solution but the problem lies in the sleep function. you may need to use a hot key & function to abort the download this will overide the sleep * Edit Maybe something like this. pressing control + a will abort the download #include <GuiConstants.au3> HotKeySet("^a", "_Abort") ;$fileLocation = "http://bigmail7.mail.daum.net/Mail-bin/bigfile_down?uid=FOgU_49p9PGq_G7u27iO7wA8gbxvhT8c" $fileLocation = "http://www.autoitscript.com/cgi-bin/getfile.pl?../autoit3/scite/download/SciTE4AutoIt3.exe" $fileName = "SciTE4AutoIt3.exe" ;file save $MyDocsFolder = "::{450D8FBA-AD25-11D0-98A8-0800361B1103}" ; GUI GUICreate("Downloader", 400, 400) ;GuiSetIcon(@SystemDir & "\mspaint.exe", 0) ; Label GUICtrlCreateLabel("Made by PS", 80, 2) GUICtrlSetColor(-1, 0xff0CCC) ; size $totalsize = InetGetSize($fileLocation) $size = Round($totalsize / 1024 / 1024, 2) ; GROUP GUICtrlCreateGroup("News", 10, 10, 380, 170) GUICtrlCreateLabel("* This is a test. Let's see if this works", 20, 30) GUICtrlSetColor(-2, 0xff0000) ; GROUP GUICtrlCreateGroup("Download Status", 10, 190, 380, 70) ; PROGRESS $progress = GUICtrlCreateProgress(20, 210, 360, 15) ; BUTTON $button1 = GuiCtrlCreateButton("Download", 10, 270, 70, 25) If $size = 0 Then GuiCtrlSetState($button1, $GUI_DISABLE) EndIf ; GUI MESSAGE LOOP GUISetState() $flag1 = True $prevDLED = 0 $wait = 20; wait 20ms for next progressstep $percentage = 0; progressbar-saveposition ; For counter use ; ConsoleWrite(_INetGetSource('www.autoitscript.com')) ; Use PHP to create a counter that only displays number in its source code While True $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $button1 $var = FileSaveDialog( "Select a location", $MyDocsFolder, "Executable files (*.exe) |Movie Clips (*.avi)", 2, $fileName) If @error <> 1 Then ;MsgBox(4096,"","You chose " & $var) InetGet($fileLocation, $var, 1, 1) GuiCtrlSetState($button1, $GUI_DISABLE) While @InetGetActive GUICtrlSetData ($progress,$percentage) ;TrayTip("Downloading", "Bytes = " & @InetGetBytesRead, 10, 16) Sleep(250) $downloadedSize = @InetGetBytesRead $percentage = Round($downloadedSize / $totalsize, 2) * 100 $label1 = GUICtrlCreateLabel("Downloaded : "& Round($downloadedSize / 1024 / 1024, 2) & "MB / File Size : "& $size & "MB [" & $percentage & "%]", 20, 243, 260, 13) GUICtrlSetColor(-1, 0xff0CCC); speed $speed = Round(4 * ($downloadedSize - $prevDLED) / 1024 / 1024, 2) $label2 = GUICtrlCreateLabel("Download speed : "& $speed & "MB/sec", 20, 228, 260, 13) GUICtrlSetColor(-1, 0xff0CCC) $prevDLED = $downloadedSize If @InetGetActive <> 1 Then ExitLoop EndIf WEnd If $flag1 = True Then MsgBox(0, "Success", "Download successful") Else MsgBox(0, "Abort", "Download aborted") EndIf GUICtrlSetData ($progress, 0) GUICtrlSetData ($label1, "") GUICtrlSetData ($label2, "") GuiCtrlSetState($button1, $GUI_ENABLE) $flag1 = True EndIf EndSelect WEnd Func _Abort() InetGet("abort") $flag1 = False FileDelete($fileName) Return EndFunc
  14. if you have a look at some of the other keys you will see options like: DisplayName: Name of app UninstallString: Path to uninstall program eg: C:\Program Files\MyApp\Uninstall.exe
  15. Take a look at this, you will need to create your own unique CLSID for the keyname. HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
×
×
  • Create New...