Microsoft VBScript运行时错误“800a000d”类型不匹配/order/search/searchresults.asp，第597行

Question

当我插入邮政编码搜索商店时，我收到此错误，但如果我重新加载网页，它就会消失。有人可以帮我解决吗？ postcode research

ddd=0                       
if request.querystring("searchtype") = "postcode" then                          
    If objRds("longitude") & "" <> "" AND objRds("latitude") & "" <> "" Then                            
       ' Response.Write("lat1 " & coords(0) & " lon1 " & coords(1) & " [] lat2 " & objRds("latitude") & "  lon2 " & objRds("longitude") & "<br/>")                          


        ddd = round(distance(coords(0), coords(1), objRds("latitude"), objRds("longitude"), "M"),1)


'Response.Write("ddd " & ddd & "<br/>")                         
    End If                          
else                            

Answer 1

ddd = round(distance(coords(0), coords(1), objRds("latitude"), objRds("longitude"), "M"),1)

您传递到DISTANCE函数的参数之一是无效的。做一个Response.Write的每个参数，你可能会发现其中一个是空白或其中一个是错误的数据类型。