#include<IE.au3>
#Include <GuiTreeView.au3>
#include <GuiComboBox.au3>
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
;#AutoIt3Wrapper_Run_Debug=y
;Global Const $CB_SETCURSEL = 0x14E
;_GUICtrlComboBox_SetCurSel ( "[CLASS:ThunderRT6ComboBox ; INSTANCE:1]", -1)


WinActivate ( "Customer Care Portal Phase-2 - Internet Explorer","")
Sleep(2000)

;CSR Team Information Combo box
WinActivate("CSR Team Information","")
Sleep ( 3000 )
;GUICtrlComboBox_SetCurSel("[CLASS:ThunderRT6ComboBox ; INSTANCE:1]", 3)
ControlCommand("CSR Team Information", "", "SelectString", 'Open Work Items: 000000061 | Green Bay/CCP IT/CCP IT Support Team')
Global $hdlComboBox = ControlGetHandle("CSR Team Information", "", "[CLASS:ThunderRT6CommandButton; INSTANCE:1]")
If IsHWnd($hdlComboBox) Then
    If _GUICtrlComboBox_SetCurSel($hdlComboBox, 3)<> -1 Then
        MsgBox($MB_ICONINFORMATION, "", "The ComboBox item #3 has been selected.")
    Else
        MsgBox($MB_ICONERROR, "", "Error during the selection of the ComboBox item.")
    EndIf
Else
    MsgBox($MB_ICONERROR, "", "Cannot obtain the handle of the ComboBox control." & @CRLF & "Error: " & @error)
 EndIf

ControlClick("CSR Team Information","","[CLASS:ThunderRT6CommandButton; INSTANCE:1]")  ;Clicks on Ok button




Sleep(1000)
;New Contact Window
WinActivate ("New Contact","")
ControlClick("Customer Care Portal Phase-2 - Internet Explorer", "","[CLASS:ThunderRT6CommandButton ; INSTANCE:16]")  ;Clicks on New contact button

Sleep(3000)
ControlSetText ( "New Contact", "", "[CLASS:ThunderRT6TextBox; INSTANCE:6]", "H30098556")  ;Enters value in textBox for for Inquired About
Sleep(2000)
ControlSetText ( "New Contact", "", "[CLASS:ThunderRT6TextBox; INSTANCE:5]", "H30098556")    ;Enters value in textBox for for Inquired For
Sleep ( 2000)

;Contact Type Combo box

$h_combobox = ControlGetHandle("New Contact", "", "[CLASS:ThunderRT6ComboBox; INSTANCE:9]")
$i_index = 3  ; Correspondance
DllCall("user32.dll", "int", "SendMessage", "hwnd", $h_combobox, "int", $CB_SETCURSEL, "int", $i_index, "int", 0)
Sleep ( 2000 )

;Inquiry Type Combo box

$h_combobox = ControlGetHandle("New Contact", "","[CLASS:ThunderRT6ComboBox; INSTANCE:1]")
$i_index = 4  ; CUSTOMER INQUIRY
DllCall("user32.dll", "int", "SendMessage", "hwnd", $h_combobox, "int", $CB_SETCURSEL, "int", $i_index, "int", 0)
Sleep ( 2000 )



ControlClick("New Contact","", "[CLASS:ThunderRT6CommandButton; INSTANCE:5]") ; Clicks on View Button



;ControlClick("New Contact","", "[CLASS:ThunderRT6CommandButton; INSTANCE:4]")    ;Clicks on Create Inquiry

;WinClose("New Contact", "")

;$h_combobox = ControlGetHandle("CSR Team Information", "", "[CLASS:ThunderRT6ComboBox ; INSTANCE:1]")
;$i_index = 2
;DllCall("user32.dll", "int", "SendMessage", "hwnd", $h_combobox, "int", $CB_SETCURSEL, "int", $i_index, "int",0)