get zillow zestimate

[mat305]

Hey guys,

I'm trying to develop a script that reads an address from excel, inputs it into

http://www.zillow.com,

clicks go, clicks the house link, then returns the Zestimate value to excel beside the address.

So far I haven't had luck because I cant figure out how to get the link to the house page.

Any ideas?

'======================================================================================================================
'Delcare objects
Set objShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")

If objFSO.FileExists("check.txt") = False Then
MsgBox "I need check.txt to begin checking"
WScript.quit
End If

'Sets up check.txt for reading.
Const ForReading = 1
Set objTextAccts = objFSO.OpenTextFile ("check.txt", ForReading)

'Sets up results.txt for writing.
If objFSO.FileExists("results.txt") = False Then
Set objFile = objFSO.CreateTextFile("results.txt")
objFile.Close
End If
Const ForAppending = 8
Set objTextResults = objFSO.OpenTextFile ("results.txt", ForAppending, True)


Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = 1

Do Until objTextAccts.AtEndOfStream

'Error handling
On Error Resume Next


'Navigate to log in page
IE.Navigate "

http://www.zillow.com"

'Wait for page to finish loading
Do while IE.busy
Loop

'Read variables from check.txt
strNextLine = objTextAccts.Readline
address = strNextLine

'Wait 2 seconds
wscript.sleep(2000)

'Fill out address and password, then submit the form
IE.Document.ALL("citystatezip").Value = address
call IE.Document.Forms(0).Submit()

'Wait for page to finish loading
Do while IE.busy
Loop

'Wait 2 seconds
wscript.sleep(2000)

Loop

'Clean up
set IE = nothing
set objshell = nothing
set address = nothing
objTextAccts.Close
objTextResults.Close

MsgBox "Done checking zillow, look at results.txt"

'======================================================================================================================

 

[l3it3r]

http://www.zillow.com/howto/api/GetDeepSearchResults.htm

you're trying to do it a bit too hard