I'm at my wits end!!! I have the following code. The submit button works on
my home computer but when I copy the dll and the ASPX file to my host
provider, the button does NOT fire.
TIA
RuizCJ
<%@ Register TagPrefix="uc1" TagName="_Foote r" Src="_Footer.as cx" %>
<%@ Page Language="vb" AutoEventWireup ="false"
Codebehind="Sig nGuestBook.aspx .vb" Inherits="Ruiz. SignGuestBook"% >
<%@ Register TagPrefix="uc1" TagName="_heade r" Src="_header.as cx" %>
<%@ Register TagPrefix="uc1" TagName="_menu" Src="_menu.ascx " %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>SignGues tBook</title>
<meta content="Micros oft Visual Studio .NET 7.1" name=GENERATOR>
<meta content="Visual Basic .NET 7.1" name=CODE_LANGU AGE>
<meta content=JavaScr ipt name=vs_default ClientScript>
<meta content=http://schemas.microso ft.com/intellisense/ie5
name=vs_targetS chema>
</HEAD>
<body leftMargin=0 topMargin=0 MS_POSITIONING= "GridLayout ">
<form id=idSignGuestB ook method=post runat="server">
<TABLE id=Table1 style="Z-INDEX: 101; LEFT: 8px; POSITION: absolute; TOP:
8px"
borderColor=#ff 3333 cellSpacing=0 cellPadding=0 width="100%" border=0>
<TR>
<TD colSpan=4><uc1: _header id=_header1
runat="server"> </uc1:_header></TD></TR>
<TR>
<TD vAlign=top width=200 rowSpan=3><uc1: _menu id=_menu1
runat="server"> </uc1:_menu></TD>
<TD style="WIDTH: 29px; HEIGHT: 41px" vAlign=top width=29
</TD> <TD style="HEIGHT: 41px" width=200></TD></TR>
<TR>
<TD style="WIDTH: 29px" vAlign=top width=29></TD>
<TD vAlign=top width="80%">
<TABLE id=Table2 cellSpacing=3 cellPadding=3 width=450 align=center
bgColor=#f1d6b9 border=0>
<TR>
<TD align=center background=Imag es/GradientPeach.g if colSpan=4Sign Guest Book</TD></TR> <TR>
<TD style="WIDTH: 172px" align=right width=172Name:*</TD> <TD><asp:textbo x id=idname runat="server" ToolTip="Enter your name
here" Height="24px" Width="312px"></asp:textbox></TD>
<TD><asp:requir edfieldvalidato r id=RequiredFiel dValidator1
runat="server" Width="7px" ControlToValida te="idname"
ErrorMessage="* "></asp:requiredfie ldvalidator></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px" align=rightLocation:*</TD> <TD><asp:textbo x id=idlocation runat="server" ToolTip="City and
state will do" Width="312px"></asp:textbox></TD>
<TD><asp:requir edfieldvalidato r id=RequiredFiel dValidator2
runat="server" ControlToValida te="idlocation "
ErrorMessage="* "></asp:requiredfie ldvalidator></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px" align=right>Web site:</TD>
<TD><asp:textbo x id=idwebsite runat="server" ToolTip="must proceed
with HTTP://" Width="312px"></asp:textbox></TD>
<TD></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px" align=right>Ema il:</TD>
<TD><asp:textbo x id=idemail runat="server" ToolTip="valid e-mail
goes here" Width="312px"></asp:textbox></TD>
<TD></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px" align=rightComment:*</TD> <TD><asp:textbo x id=idcomment runat="server" ToolTip="type any
comment here" Height="136px" Width="312px"
TextMode="Multi Line"></asp:textbox></TD>
<TD><asp:requir edfieldvalidato r id=RequiredFiel dValidator3
runat="server" ControlToValida te="idcomment"
ErrorMessage="* "></asp:requiredfie ldvalidator></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px" align=right width=172 colSpan=1<asp:checkbo x id=idemailme runat="server" ToolTip="if you enter an e-mail and check this box, you'll be e-mailed automatically with new
updates" Height="13px"></asp:checkbox></TD>
<TD>E-mail me when there's new update</TD>
<TD></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px"></TD>
<TD><asp:butt on id=Button1 runat="server" Text="Submit"
EnableViewState =True CausesValidatio n=True</asp:Button>&nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p; & nbsp; &nbs p;
*<FONT size=2>=Require d</FONT></TD>
<TD></TD>
<TD></TD></TR>
<TR>
<TD style="WIDTH: 172px">
<asp:TextBox id=TextBox1 runat="server" Width="95px"
Visible="False" ></asp:TextBox></TD>
<TD><asp:labe l id=idThankYou runat="server" Width="280px"
Visible="False" >Thank you for signing our guestbook</asp:label></TD>
<TD></TD>
<TD></TD></TR></TABLE></TD>
<TD width=200></TD></TR>
<TR>
<TD style="WIDTH: 29px" width=29></TD>
<TD width="80%"><uc 1:_footer id=_Footer1
runat="server"> </uc1:_footer></TD>
<TD width=200></TD></TR></TABLE></FORM>
</body>
</HTML>
code behind.....
Imports System
Imports System.Data
Imports System.Data.Ole Db
Imports Microsoft.Visua lBasic
Public Class SignGuestBook
Inherits System.Web.UI.P age
Dim myConnection As OleDbConnection
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub
InitializeCompo nent()
Me.ID = "idSignGuestBoo k"
End Sub
Protected WithEvents idname As System.Web.UI.W ebControls.Text Box
Protected WithEvents idlocation As System.Web.UI.W ebControls.Text Box
Protected WithEvents idwebsite As System.Web.UI.W ebControls.Text Box
Protected WithEvents idemail As System.Web.UI.W ebControls.Text Box
Protected WithEvents idcomment As System.Web.UI.W ebControls.Text Box
Protected WithEvents idThankYou As System.Web.UI.W ebControls.Labe l
Protected WithEvents idemailme As System.Web.UI.W ebControls.Chec kBox
Protected WithEvents RequiredFieldVa lidator1 As
System.Web.UI.W ebControls.Requ iredFieldValida tor
Protected WithEvents RequiredFieldVa lidator2 As
System.Web.UI.W ebControls.Requ iredFieldValida tor
Protected WithEvents RequiredFieldVa lidator3 As
System.Web.UI.W ebControls.Requ iredFieldValida tor
Protected WithEvents Button1 As System.Web.UI.W ebControls.Butt on
Protected WithEvents TextBox1 As System.Web.UI.W ebControls.Text Box
'NOTE: The following placeholder declaration is required by the Web Form
Designer.
'Do not delete or move it.
Private designerPlaceho lderDeclaration As System.Object
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeCompo nent()
End Sub
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'Put user code to initialize the page here
myConnection = New
OleDbConnection (ConfigurationS ettings.AppSett ings("Connectio nString"))
End Sub
Sub AddNewGuest(ByV al sender As System.Object, ByVal e As
System.EventArg s) Handles Button1.Click
' Dim MyCommand As OleDbCommand
Dim emailme
Dim InsertCmd As String = "insert into tblGuestBook (name, email,
http, comment, location) values (@strName, @stremail, @strhttp, @strcomment,
@strlocation)"
Dim MyCommand As OleDbCommand = New OleDbCommand(In sertCmd,
myConnection)
MyCommand.Param eters.Add(New OleDbParameter( "@strName",
OleDbType.Char) )
MyCommand.Param eters("@strName ").Value = idname.Text
MyCommand.Param eters.Add(New OleDbParameter( "@stremail" ,
OleDbType.Char) )
MyCommand.Param eters("@stremai l").Value = idemail.Text
MyCommand.Param eters.Add(New OleDbParameter( "@strhttp",
OleDbType.Char) )
MyCommand.Param eters("@strhttp ").Value = idwebsite.Text
MyCommand.Param eters.Add(New OleDbParameter( "@strcommen t",
OleDbType.Char) )
MyCommand.Param eters("@strcomm ent").Value = idcomment.Text
MyCommand.Param eters.Add(New OleDbParameter( "@strlocati on",
OleDbType.Char) )
MyCommand.Param eters("@strloca tion").Value = idlocation.Text
MyCommand.Param eters.Add(New OleDbParameter( "@tf",
OleDbType.Boole an))
MyCommand.Param eters("@tf").Va lue = idemailme.Check ed
'MyCommand.Para meters.Add(New OleDbParameter( "@timesubmi t",
OleDbType.DBTim e))
'MyCommand.Para meters("@timesu bmit").Value = DateTime.Today
MyCommand.Conne ction.Open()
MyCommand.Execu teNonQuery()
MyCommand.Conne ction.Close()
myConnection.Cl ose()
idname.Text = " "
idemail.Text = " "
idwebsite.Text = " "
idcomment.Text = " "
idlocation.Text = " "
idThankYou.Visi ble = True
End Sub
End Class
