asp 调用api方法（Get）

<%
      'oa密码安全机制
        Dim xml,str
        Set xml = Server.Createobject("microsoft.XMLHTTP") 
        xml.Open "GET", "http://10.1.33.61:8080/platform/GetStrategy?app_token=f4fdb0e6fae042608253f10bd39c46b4", False
        xml.Send
        str=xml.responseText        
         response.write  "<script language='javascript'>infoToJson("& str &",'"&Session("uKL")&"')</script>"
        Set xml = Nothing     

        %>

<script type="text/javascript">
         //str:正则表达式  ukl:密码
        function infoToJson(str, ukl) {
            if (ukl.length != 0) {
                //获取正则表达式
                var reg = str.data.express;
                var r = ukl.match(reg);
                if (r == null) {
                    alert('密码中请包含：数字，字母大小写!');
                }
            }
        }
    </script>