帮我看看为什么无法实现?
oar 2002-11-08 10:10:00 为什么当按下“确定”提交时,只执行JS里的,而不执行Private Sub Button1_ServerClick里的?
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="pay.aspx.vb" Inherits="GameFamily.pay" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<script language="javascript">
function dosubmit()
{
Form1.action="https://www.ips.com.cn/ipay/ipayment.asp";
Form1.submit();
}
</script>
</HEAD>
<body><form id="Form1" method="post" runat="server"><INPUT type="button" value="确 定" onclick="dosubmit();" id="Button1" name="Button1" runat="server"></form></body>
</HTML>
Imports GameFamily.common
Imports System.Data
Imports System.Data.SqlClient
Imports System
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Collections
Imports System.ComponentModel
Imports System.Web.Security
Public Class pay
Inherits System.Web.UI.Page
Protected WithEvents Form1 As System.Web.UI.HtmlControls.HtmlForm
#Region " Web 窗体设计器生成的代码 "
'该调用是 Web 窗体设计器所必需的。
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
'不要使用代码编辑器修改它。
InitializeComponent()
End Sub
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_ServerClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ServerClick
....
End Sub
End Class