<%@ Page language="c#" Codebehind="WebForm2.aspx.cs" AutoEventWireup="false" Inherits="_2003.WebForm2" %>
<HTML>
<HEAD>
<TITLE>WebForm2</TITLE>
<META content="Microsoft Visual Studio .NET 7.1" name="GENERATOR">
<META content="C#" name="CODE_LANGUAGE">
<META content="JavaScript" name="vs_defaultClientScript">
<META content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
</HEAD>
<BODY MS_POSITIONING="GridLayout" scroll="no" style="border:none;margin:0px" >
<IFRAME id="iframe1" width="100%" height="600px" frameborder=0></IFRAME>
</BODY>
</HTML>
<SCRIPT language="vbscript">
Function bytes2BSTR(vIn)
on error resume next
dim strReturn
dim i,ThisCharCode,NextCharCode
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
Function URLEncode(strURL)
Dim I
Dim tempStr
For I = 1 To Len(strURL)
If Asc(Mid(strURL, I, 1)) < 0 Then
tempStr = "%" & Right(CStr(Hex(Asc(Mid(strURL, I, 1)))), 2)
tempStr = "%" & Left(CStr(Hex(Asc(Mid(strURL, I, 1)))), Len(CStr(Hex(Asc(Mid(strURL, I, 1))))) - 2) & tempStr
URLEncode = URLEncode & tempStr
ElseIf (Asc(Mid(strURL, I, 1)) >= 65 And Asc(Mid(strURL, I, 1)) <= 90) Or (Asc(Mid(strURL, I, 1)) >= 97 And Asc(Mid(strURL, I, 1)) <= 122) Then
URLEncode = URLEncode & Mid(strURL, I, 1)
Else
URLEncode = URLEncode & "%" & Hex(Asc(Mid(strURL, I, 1)))
End If
Next
End Function
</script>
<SCRIPT language="javascript">
<!--
function window.onload()
{
var str = GetStringByUrl("http://www.baidu.com/","get","");
str = GoReplace(str);
// document.all.iframe1.document.write(str);
window.frames[0].document.write(str);
}
function GoReplace(str)
{
str = str.replace("name=wd","name=wd onkeydown=\"javascript:window.parent.GoPost();\"");
str = str.replace("<input type=submit","<input type=button onclick=\"javascript:window.parent.GoSearch() ;\"");
str = str.replace("<form name=f action=http://www.baidu.com/s", "<form1 name='f' actoin='#'");
return str
}
function GoPost()
{
if(window.frames[0].event.keyCode == 13)
{
GoSearch();
}
}
function GoSearch()
{
var value = window.frames[0].document.getElementsByName("wd")[0].value
alert(value);
var str = GetStringByUrl("http://www.baidu.com/s?cl=3&wd="+URLEncode(value),"get","");
str = GoReplace(str);
window.frames[0].document.body.innerHTML = str;
return false;
}
function GetStringByUrl(url,method,params)
{
var oxmlHttpForJs = null;
oxmlHttpForJs = new ActiveXObject("MSXML2.XmlHttp");
oxmlHttpForJs.open(method,url,false);
oxmlHttpForJs.setRequestHeader("cache-control","no-cache");
oxmlHttpForJs.setRequestHeader("charset","gb2312");
oxmlHttpForJs.send(params);
var res = "";
res = bytes2BSTR(oxmlHttpForJs.responseBody)
oxmlHttpForJs = null;
return res;
}
//-->
</SCRIPT>
