Access Webpage, Fill Fields, Retrieve Data

I am having a really difficult time with this code. I am trying to fill in some fields on an webpage in an effort to eventually retrieve some data. I have read lots of posts on the topic and somehow I'm still confused. My code crashes on this line and gives an Automation error, Unspecified Error message: With appIE.document.forms(0). No matter what I try, I can't get past this line. I have also tried: With appIE.document.all

Sub PropInfo()
Dim appIE As SHDocVw.InternetExplorer
Set appIE = CreateObject("INTERNETEXPLORER.APPLICATION")
appIE.Visible = True
appIE.navigate "http://gisims2.miamidade.gov/MyHome/proptext.asp"
Do While appIE.Busy: DoEvents: Loop
Do While appIE.readyState <> complete: DoEvents: Loop

With appIE.document.all
.Item("cmd").Value = "FINDADDR"
.Item("cmdTemp").Value = "FINDADDR"
.Item("searchtool").Value = "ADDR" 'Search by' dropdown
.Item("stnum").Value = "2417" 'house #' field
.Item("stdir").Value = ""
.Item("stname").Value = "ponce de leon" 'street name' field
.Item("sttype").Value = "BLVD" 'street type' field
.submit
End With
End Sub