detecting carrier.ahk

#SingleInstance,Force
;**************************************
Area_Code:="267"
Prefix:="777"

pwb := WBGet()
pwb.Navigate("http://www.fonefinder.net/findome.php?npa=" Area_Code "&nxx=" Prefix) ;Navigate to URL
while pwb.busy or pwb.ReadyState != 4 ;Wait for page to load
	Sleep, 100

Row:=pwb.document.GetElementsByTagName("table")[1].GetElementsByTagName("TR")[1]
Loop, % Row.GetElementsByTagName("TD").length {
	If (A_Index=3)
		City:=Row.GetElementsByTagName("TD")[A_Index-1].InnerText
	If (A_Index=4)
		State:=Row.GetElementsByTagName("TD")[A_Index-1].InnerText
	If (A_Index=5)
		Tel_Comp:=Row.GetElementsByTagName("TD")[A_Index-1].InnerText
	If (A_Index=6)
		Carrier_Type:=Row.GetElementsByTagName("TD")[A_Index-1].InnerText
}
MsgBox % City a_tab State a_tab Tel_comp a_tab Carrier_Type

;*******************************************************
;~ Alternatively you could skip the above loop and just do...
City:=Row.GetElementsByTagName("TD")[2].InnerText
State:=Row.GetElementsByTagName("TD")[3].InnerText
Tel_Comp:=Row.GetElementsByTagName("TD")[4].InnerText
Carrier_Type:=Row.GetElementsByTagName("TD")[5].InnerText
MsgBox % City a_tab State a_tab Tel_comp a_tab Carrier_Type