' VBSCRIPT Sample Code Set QuickAddress = Server.CreateObject("QAS.QAProWeb") ' If object creation was successful, perform search. If IsObject(QuickAddress) Then Dim asSearch (2) asSearch(0) = "2" asSearch(1) = "M46 9EE" Dim iPotential, asPreviews, asTags, aiFlags, aiScores QuickAddress.Search 0, "GBR", 1, asSearch, iPotential, asPreviews, asTags, aiFlags, aiScores etc....Paul