<script language="javascript" src=" http://www.wisezc.cn/ws/calendar.aspx">
怎么什么也没有输出啊?那个文件会输出当前农历
<script language="javascript" src=" http://www.wisezc.cn/ws/calendar.aspx">
怎么什么也没有输出啊?那个文件会输出当前农历
给你换个方式吧
<script language="vbscript">
dim http
set http=createobject("Microsoft.XMLHTTP")
Http.open "Post"," http://www.wisezc.cn/ws/calendar.aspx"
Http.setRequestHeader "Content-Type","text/HTML"
'Http.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
Http.send(null)
'msgbox "提交完成,正在处理"
document.write (bytes2BSTR(Http.responseBody))
set http=nothing
Function bytes2BSTR(vIn)
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
</script>
你那种写法是调用js的写法,要在js中调用aspx文件,可以写成
1、window.showModalDialog(" http://www.wisezc.cn/ws/calendar.aspx", "", "dialogWidth:197px; dialogHeight:210px; dialogLeft:200px; dialogTop:200px; status:no; directories:yes;scrollbars:no;Resizable=no; ");
-----以对话框的形式打开
2、document.open( http://www.wisezc.cn/ws/calendar.aspx);
--打开一个页面,也可以设置它的宽度和高度