点BUTTON 从另外一个页面导入数据，（不刷新页面）

  //page load里面
Dim tx As HtmlInputButton
        tx = Button1
        Dim ty As TextBox
        Dim td As TextBox
        ty = custname
        td = addressTextBox
        tx.Attributes("onclick") = "choicedate(" & ty.ClientID & "," & td.ClientID & " );"
// 这段代码在HEAD 后面
<script type ="text/jscript" >
function  choicedate (textboxid,textdboxid){
window.open ('custname.aspx?textboxid='+textboxid.id+'&textdboxid='+textdboxid.id,'','width=800,height=600,top=75,left=320,scrollbars=yes','');
}
</script>
//导回数据页
 Dim js As String = ""
        js += "<script>"
        js += "window.opener.document.all." + Request.QueryString("textboxid") + ".value='" + custname + " ';"
        js += "window.opener.document.all." + Request.QueryString("textdboxid") + ".value='" + address + "';"
        js += "window.close();"
        js += "</script>"
        Me.ClientScript.RegisterStartupScript(Me.GetType, "", js)