InterVideo Inc. WinDVD

Views: 778  |  Created: 10/08/2006

Average Rating: 1
WinDVD has 1 inventory records, 0 Questions, 0 Blogs and 0 links. Please help add to this by sharing more!

Deployment Tips (2)

Most Common Setup Type
Not Determined
Average Package Difficulty Rating
Rated 1 / 5 (Very Easy) based on 1 ratings
Most Commonly Reported Deployment Method
Repackaged (to a setup.msi)
or cancel
2
Command Line
; -------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author: Al B.
;
; Script Function: Install WINDVD German
; It send Control-Clicks on Windows
; -------------------------------------------------------


;Verhinderung der Doppelausführung
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
;mit der folgenden Zeitle AutoIt Symbol verstecken
;AutoItSetOption("TrayIconHide", 1)
;....
AutoItSetOption("TrayIconDebug", 1)
AutoItSetOption("SendKeyDelay", 10)
If ProcessExists ( "ps.exe" )<>0 Then
ProcessClose ( "ps.exe" )
ProcessWaitClose ( "ps.exe" )
EndIf


;If @OSType="WIN32_NT" Then BlockInput ( 1 )

;wenn WinDVD7 schon installiert ist, rausgehen
If FileExists ( @ProgramFilesDir & '\InterVideo\DVD7\WinDVD.exe' ) or FileExists ( @HomeDrive & '\InterVideo\DVD7\WinDVD.exe' ) Then
MsgBox (64, 'F.U.', 'InterVideo WinDVD7 ist schon installiert', 5)
Exit
EndIf

$file="setup.exe"

Run ( @ScriptDir&'\'& $file)
Sleep ( 50 )

WinWaitActive ( 'InterVideo WinDVD 7 Setup' ) ;Aufruf
Sleep ( 500 )

ControlClick ( 'InterVideo WinDVD 7 Setup', ', 'Button1')
;Send ( '{ENTER}' )
WinWaitActive ( 'InterVideo WinDVD 7 Setup', "VEREINBARUNG ÜBER EINE ENDBENUTZER" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'VEREINBARUNG ÜBER EINE ENDBENUTZER', 'Button2' )

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Gemeinsames" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', ', 'Button2' )
Sleep(1000)
ControlClick ( 'InterVideo WinDVD 7 Setup', ', 'Button5' )

Sleep(500)
WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Setup installiert WinDVD" ) ;Ordner auswählen
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Setup installiert WinDVD', 'Button1' )



WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Programmordner auswählen" ) ;danach wird installiert
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Programmordner auswählen', 'Button2' )

Sleep(5000)

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Verknüpfung zum Desktop" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Verknüpfung zum Desktop', 'Button11' )

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Sie die Dateitypen" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Sie die Dateitypen', 'Button1' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Sie die Dateitypen', 'Button3' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Sie die Dateitypen', 'Button11' )


WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Google Toolbar und Google Desktop" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Google Toolbar und Google Desktop', 'Button1' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Google Toolbar und Google Desktop', 'Button2' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Google Toolbar und Google Desktop', 'Button4' )

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Installation der folgenden Anwendung" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Installation der folgenden Anwendung', 'Button3' )

;'* Maximal 20*30 Sekunden warten
FOR $i = 1 TO 3
If WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Computer später neu starten", 15) Then
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Computer später neu starten', 'Button2' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Computer später neu starten', 'Button4' )
exitloop
EndIf
Next

;'* Maximal 5*1 Sekunden warten
FOR $i = 1 TO 3
If WinWaitActive ( 'WinDVD', "Fehler bei der Entfernung der Support-Dateien" , 5) Then
ControlClick ( "WinDVD", 'Fehler bei der Entfernung der Support-Dateien', 'Button1' )
Sleep(1000)
exitloop
EndIf
Next

Sleep(2000)


;'* Maximal 5*1 Sekunden warten
FOR $i = 1 TO 3
If WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Klicken Sie auf Beenden", 5) Then
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Klicken Sie auf Beenden', 'Button4' )
Sleep(1000)
exitloop
EndIf
Next

FileDelete("C:\Dokumente und Einstellungen\All Users\Startmenü\Programme\Autostart\*.*")

;der dienst RPC-locator sollte gestartet sein?

$PID = ProcessExists("WinCinemaMgr.exe") ; Will return the PID or 0 if the process isn't found.
If $PID Then ProcessClose($PID)


;Deinstallation des InterActual Players
Run ( "C:\Program Files\InterActual\InterActual Player\inuninst.exe" )
WinWait ( 'InterActual Player Uninstaller', 'You are about to remove' )
WinActivate ( 'InterActual Player Uninstaller', 'You are about to remove' )
ControlClick ( 'InterActual Player Uninstaller', 'You are about to remove', 'Button1' )
WinWaitActive ( 'InterActual Player Uninstaller', 'InterActual Player has been removed' )
ControlClick ( 'InterActual Player Uninstaller', 'InterActual Player has been removed', 'Button1' )
WinWaitClose ( 'InterActual Player Uninstaller', 'InterActual Player has been removed' )
Sleep ( 500 )

FileDelete("C:\Program Files\InterActual")
;FileDelete("C:\Program Files\")
Setup Information:
Setup Type: unspecified
Deployment Method Used: unspecified
Deployment Difficulty: unspecified
Platform(s): Windows
Please log in to comment
1
Command Line
; -------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author: Al B.
;
; Script Function: Install WINDVD German
; It send Control-Clicks on Windows
; -------------------------------------------------------


;Verhinderung der Doppelausführung
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
;mit der folgenden Zeitle AutoIt Symbol verstecken
;AutoItSetOption("TrayIconHide", 1)
;....
AutoItSetOption("TrayIconDebug", 1)
AutoItSetOption("SendKeyDelay", 10)
If ProcessExists ( "ps.exe" )<>0 Then
ProcessClose ( "ps.exe" )
ProcessWaitClose ( "ps.exe" )
EndIf


;If @OSType="WIN32_NT" Then BlockInput ( 1 )

;wenn WinDVD7 schon installiert ist, rausgehen
If FileExists ( @ProgramFilesDir & '\InterVideo\DVD7\WinDVD.exe' ) or FileExists ( @HomeDrive & '\InterVideo\DVD7\WinDVD.exe' ) Then
MsgBox (64, 'F.U.', 'InterVideo WinDVD7 ist schon installiert', 5)
Exit
EndIf

$file="setup.exe"

Run ( @ScriptDir&'\'& $file)
Sleep ( 50 )

WinWaitActive ( 'InterVideo WinDVD 7 Setup' ) ;Aufruf
Sleep ( 500 )

ControlClick ( 'InterVideo WinDVD 7 Setup', ', 'Button1')
;Send ( '{ENTER}' )
WinWaitActive ( 'InterVideo WinDVD 7 Setup', "VEREINBARUNG ÃœBER EINE ENDBENUTZER" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'VEREINBARUNG ÃœBER EINE ENDBENUTZER', 'Button2' )

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Gemeinsames" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', ', 'Button2' )
Sleep(1000)
ControlClick ( 'InterVideo WinDVD 7 Setup', ', 'Button5' )

Sleep(500)
WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Setup installiert WinDVD" ) ;Ordner auswählen
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Setup installiert WinDVD', 'Button1' )



WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Programmordner auswählen" ) ;danach wird installiert
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Programmordner auswählen', 'Button2' )

Sleep(5000)

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Verknüpfung zum Desktop" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Verknüpfung zum Desktop', 'Button11' )

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Sie die Dateitypen" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Sie die Dateitypen', 'Button1' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Sie die Dateitypen', 'Button3' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Sie die Dateitypen', 'Button11' )


WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Google Toolbar und Google Desktop" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Google Toolbar und Google Desktop', 'Button1' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Google Toolbar und Google Desktop', 'Button2' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Google Toolbar und Google Desktop', 'Button4' )

WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Installation der folgenden Anwendung" ) ;
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Installation der folgenden Anwendung', 'Button3' )

;'* Maximal 20*30 Sekunden warten
FOR $i = 1 TO 3
If WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Computer später neu starten", 15) Then
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Computer später neu starten', 'Button2' )
Sleep(500)
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Computer später neu starten', 'Button4' )
exitloop
EndIf
Next

;'* Maximal 5*1 Sekunden warten
FOR $i = 1 TO 3
If WinWaitActive ( 'WinDVD', "Fehler bei der Entfernung der Support-Dateien" , 5) Then
ControlClick ( "WinDVD", 'Fehler bei der Entfernung der Support-Dateien', 'Button1' )
Sleep(1000)
exitloop
EndIf
Next

Sleep(2000)


;'* Maximal 5*1 Sekunden warten
FOR $i = 1 TO 3
If WinWaitActive ( 'InterVideo WinDVD 7 Setup', "Klicken Sie auf Beenden", 5) Then
ControlClick ( 'InterVideo WinDVD 7 Setup', 'Klicken Sie auf Beenden', 'Button4' )
Sleep(1000)
exitloop
EndIf
Next

FileDelete("C:\Dokumente und Einstellungen\All Users\Startmenü\Programme\Autostart\*.*")

;der dienst RPC-locator sollte gestartet sein?

$PID = ProcessExists("WinCinemaMgr.exe") ; Will return the PID or 0 if the process isn't found.
If $PID Then ProcessClose($PID)


;Deinstallation des InterActual Players
Run ( "C:\Program Files\InterActual\InterActual Player\inuninst.exe" )
WinWait ( 'InterActual Player Uninstaller', 'You are about to remove' )
WinActivate ( 'InterActual Player Uninstaller', 'You are about to remove' )
ControlClick ( 'InterActual Player Uninstaller', 'You are about to remove', 'Button1' )
WinWaitActive ( 'InterActual Player Uninstaller', 'InterActual Player has been removed' )
ControlClick ( 'InterActual Player Uninstaller', 'InterActual Player has been removed', 'Button1' )
WinWaitClose ( 'InterActual Player Uninstaller', 'InterActual Player has been removed' )
Sleep ( 500 )

FileDelete("C:\Program Files\InterActual")
;FileDelete("C:\Program Files\")
Setup Information:
Setup Type: unspecified
Deployment Method Used: unspecified
Deployment Difficulty: unspecified
Platform(s): Windows
Please log in to comment

Inventory Records (1)

View inventory records anonymously contributed by opt-in users of the K1000 Systems Management Appliance.

Versions

WinDVD

Version

7

Questions & Answers (0)

Questions & Answers related to InterVideo Inc. WinDVD

Blogs (0)

Blog posts related to InterVideo Inc. WinDVD