Jump to content

Everything made by AUTOiT Language


lgvlgv
 Share

Recommended Posts

here is code source

A simple prog that installs autocad depending of OS.

(cant find attachment link when i post again, but heres the source code of one example just compile it with AutoIT)

save file as "ACADA2011-XLA.au3" and compile.

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_icon=..\icons\neng11.ico

#AutoIt3Wrapper_outfile=..\exe\AutoCad-XLA.exe

#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

EnvSet ( "SEE_MASK_NOZONECHECKS" , "1")

EnvUpdate()

$satstring=DriveMapGet("b:")

$satdrive = StringSplit($satstring, "\")

If @OSArch = "X64" Then

While ProcessExists("Setup.exe")

Sleep(6000)

WEnd

DriveMapDel("P:")

DriveMapAdd("P:","\\"& $satdrive[3] & "\NAL$\ZENINSTALL")

DriveMapDel("G:")

DriveMapAdd("G:","\\"& $satdrive[3] & "\NAL$\ZENINSTALL")

local $key7 = "HKU64"

ShellExecuteWait ( "B:\CAD\R18\ACADA2011_64\AdminImage\Setup.exe", " /qb /I 'B:\CAD\R18\ACADA2011_64\AdminImage\Architecture 2011 64bit.ini' /language en-US","B:\CAD\R18\ACADA2011_64\AdminImage", "open")

Sleep(10000)

While ProcessExists("Setup.exe")

Sleep(6000)

WEnd

ElseIf @OSArch ="X86" Then

While ProcessExists("Setup.exe")

Sleep(6000)

WEnd

local $key7 = "HKU"

DriveMapDel("P:")

DriveMapAdd("P:","\\"& $satdrive[3] & "\NAL$\ZENINSTALL")

DriveMapDel("G:")

DriveMapAdd("G:","\\"& $satdrive[3] & "\NAL$\ZENINSTALL")

ShellExecuteWait ( "B:\CAD\R18\ACADA2011_32\AdminImage\Setup.exe"," /qb /I 'B:\CAD\R18\ACADA2011_32\AdminImage\Architecture 2011 32.ini' /language en-US","B:\CAD\R18\ACADA2011_32\AdminImage", "open")

While ProcessExists("Setup.exe")

Sleep(6000)

WEnd

Else

EndIf

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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
Back to top
×
×
  • Create New...

Important Information

This site uses cookies - We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.