배경 추측을 위한 HTA 애플릿을 구현하는 다양한 방법

이 글에서는 배경 추측을 위한 HTA 애플릿을 구현하는 다양한 방법을 공유합니다

rree

=================== JS 버전 작성 방법:

js를 변경하면 두 번째 줄의 "onclick=vbs:isExist(http.value)"에서 "vbs:"를 제거해야 합니다

<input type=text id=http size=28 style="color:888888" value="[url]http://www.haiyangtop.net[/url]">
<input type=button onclick=vbs:isExist(http.value) value="检测url是否存在" style="color:888888">
<div id="t"></div>
<script language=vbs>
function isExist(url)
dic="c:\dic.dic"
Set fso = CreateObject("Scripting.FileSystemObject")
set zidian=fso.OpenTextFile(dic,1,False)
Do While zidian.AtEndOfStream <> true
path=zidian.readline
set xmlhttp = CreateObject("Microsoft.XMLHTTP")
       xmlhttp.open "GET",http.value+path,false
       xmlhttp.send
       t.innerHTML = t.innerHTML&url&path&"--------"&xmlhttp.status&"<br>"
       loop
End Function
</script>

페이지에 사전을 작성하는 방법은 다음과 같습니다. vbscript 버전:

아아아아

======================================= ======== ===

아아앙

===========마지막 것이 사용하기 더 쉽습니다

위 내용은 배경 추측을 위한 HTA 애플릿을 구현하는 다양한 방법의 상세 내용입니다. 자세한 내용은 PHP 중국어 웹사이트의 기타 관련 기사를 참조하세요!