?
Solved

ASP Component - Msgbox

Posted on 2001-07-16
9
Medium Priority
?
277 Views
Last Modified: 2012-08-14
Hello. I have created a .dll file including the following function:

Public Function Age(FieldToTest)
    If Not IsNumeric(FieldToTest) Then
        MsgBox "Please enter a valid age", vbOKOnly, "Age verification"
        Age = False
    ElseIf CInt(FieldToTest) < 0 Or CInt(FieldToTest) > 130 Then
       MsgBox "Please enter a valid age", vbOKOnly, "Age verification"
       Age = False
    Else
        Age = True
    End If
End Function


It works fine combined with my .asp file and the .asp error messages appear but the Msgbox doesn't work. Below is the .asp file:

<%
Option Explicit
Dim TheMessage
Dim MyFV

If IsEmpty(Request.Form("Submit")) Then
      TheMessage = "Please complete all the fields on the page"
else
      set MyFV = Server.CreateObject("FieldValidation.FVProcs")
      If not MyFV.EmailAddress(Request.Form("EmailAddress")) Then
            TheMessage = "Email Address is not valid!"
      End If
      If not MyFV.Age(Request.Form("Age")) Then
            TheMessage = TheMessage & " Age is not valid!"
      End If
      If not MyFV.BirthDate(Request.Form("BirthDate")) Then
            TheMessage = TheMessage & " Birth Date is not valid!"
      End If
      If not MyFV.Phone(Request.Form("Phone")) Then
            TheMessage = TheMessage & " Phone is not valid!"
      End If
      If not MyFV.ZipCode(Request.Form("ZipCode")) Then
            TheMessage = TheMessage & " Zip Code is not valid!"
      End If
      If len(TheMessage) = 0 Then
            TheMessage = "Your Data was accepted"
      End If
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 FINAL//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
<META NAME="Generator" CONTENT="NetObjects Fusion 4.0.1 for Windows">
<TITLE>Field Validation</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF" LINK="#0000FF" VLINK="#800080" TEXT="#000000" TOPMARGIN=0 LEFTMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
    <FORM NAME="LAYOUTFORM" ACTION="./index.asp" METHOD=POST>
        <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=615>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD WIDTH=15 HEIGHT=15><IMG SRC="./assets/images/autogen/clearpixel.gif" WIDTH=15 HEIGHT=1 BORDER=0></TD>
                <TD></TD>
                <TD WIDTH=74><IMG SRC="./assets/images/autogen/clearpixel.gif" WIDTH=74 HEIGHT=1 BORDER=0></TD>
                <TD WIDTH=456><IMG SRC="./assets/images/autogen/clearpixel.gif" WIDTH=456 HEIGHT=1 BORDER=0></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=24></TD>
                <TD WIDTH=600 COLSPAN=3><IMG ID="Banner2" HEIGHT=24 WIDTH=600 SRC="./assets/images/autogen/FV_NTabBanner.gif" BORDER=0 ALT="Field Validation"></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=4></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD></TD>
                <TD WIDTH=600 COLSPAN=3><P><I><FONT SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT"><% Response.Write TheMessage %></FONT></I></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=10></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD></TD>
                <TD WIDTH=600 COLSPAN=3  BGCOLOR="#CCFFFF">
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=600>
                        <TR>
                            <TD><P><B><FONT SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT">Email Address</FONT></B></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=22></TD>
                <TD WIDTH=144 COLSPAN=2><INPUT ID="FormsEditField1" TYPE=TEXT NAME="EmailAddress" VALUE="<% Response.Write Request.Form("EmailAddress") %>" SIZE=18 MAXLENGTH=18></TD>
                <TD></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=6></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD></TD>
                <TD WIDTH=600 COLSPAN=3  BGCOLOR="#CCFFFF">
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=600>
                        <TR>
                            <TD><P><B><FONT SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT">Age</FONT></B></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=22></TD>
                <TD WIDTH=144 COLSPAN=2><INPUT ID="FormsEditField2" TYPE=TEXT NAME="Age" VALUE="<% Response.Write Request.Form("Age") %>" SIZE=18 MAXLENGTH=18></TD>
                <TD></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=7></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD></TD>
                <TD WIDTH=600 COLSPAN=3  BGCOLOR="#CCFFFF">
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=600>
                        <TR>
                            <TD><P><B><FONT SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT">Birth Date</FONT></B></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=22></TD>
                <TD WIDTH=144 COLSPAN=2><INPUT ID="FormsEditField3" TYPE=TEXT NAME="BirthDate" VALUE="<% Response.Write Request.Form("BirthDate") %>" SIZE=18 MAXLENGTH=18></TD>
                <TD></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=8></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD></TD>
                <TD WIDTH=600 COLSPAN=3  BGCOLOR="#CCFFFF">
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=600>
                        <TR>
                            <TD><P><B><FONT SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT">Phone</FONT></B></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=22></TD>
                <TD WIDTH=144 COLSPAN=2><INPUT ID="FormsEditField4" TYPE=TEXT NAME="Phone" VALUE="<% Response.Write Request.Form("Phone") %>" SIZE=18 MAXLENGTH=18></TD>
                <TD></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=7></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD></TD>
                <TD WIDTH=600 COLSPAN=3  BGCOLOR="#CCFFFF">
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=600>
                        <TR>
                            <TD><P><B><FONT SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT">Zip Code</FONT></B></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=22></TD>
                <TD WIDTH=144 COLSPAN=2><INPUT ID="FormsEditField5" TYPE=TEXT NAME="ZipCode" VALUE="<% Response.Write Request.Form("ZipCode") %>" SIZE=18 MAXLENGTH=18></TD>
                <TD></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD COLSPAN=4 HEIGHT=7></TD>
            </TR>
            <TR VALIGN=TOP ALIGN=LEFT>
                <TD HEIGHT=24></TD>
                <TD WIDTH=70><INPUT TYPE=SUBMIT NAME="Submit" VALUE="Submit" ID="FormsButton1"></TD>
                <TD COLSPAN=2></TD>
            </TR>
        </TABLE>
    </FORM>
</BODY>
</HTML>
 
0
Comment
Question by:AlexKalkakos
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 2
  • 2
  • +1
9 Comments
 

Expert Comment

by:madsun
ID: 6285679
Hi Alex,

Since you are using dll, i.e. activex dll, the property of this kind of projects in Visual basic is unattended execution. That means, no user interaction. So, msgbox will not work in this case.

Hope this answers you.

Madsun
0
 
LVL 2

Expert Comment

by:DirkVe
ID: 6285714
The answer of madsun is right. You can solve this in many ways:

-add an extra parameter (String) that you fill in when an error occurs.
-raise an error and intercept this in asp with the Err object.

0
 

Author Comment

by:AlexKalkakos
ID: 6285812
I forgot to mention. The error message I receive is :
"Access denied Msgbox"
DirkVe can you be more specific to what excactly I have to do? Step by step instructions would be very helpful.
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 2

Accepted Solution

by:
DirkVe earned 600 total points
ID: 6285860
Well, you cannot use MsgBox in components/dll's.
In asp you can do it if use a little trick: put the MSGBOX in a script-block.

The solution you're trying to use is not the good approach:
You do a simple (fixed) verification/validation with a SERVER-side component. This mean that you create extra traffic to the server and then back to the client. This is only necessary if the validation is data-based (like an authentication with data from the database). So, in your case it's better to put the validation of the age in your asp-code.

I give you a simple example:
I took your Age function, put that code in asp, and added a script-block around the MsgBox. I guess you can do the rest with the help that I provided?

Here's your code:

Public Function Age(FieldToTest)
   If Not IsNumeric(FieldToTest) Then
   %>
          <SCRIPT language="VBScript">
          MsgBox "Please enter a valid age", vbOKOnly, "Age verification"
          </SCRIPT>
          <%
       
       Age = False
   ElseIf CInt(FieldToTest) < 0 Or CInt(FieldToTest) > 130 Then
   %>
          <SCRIPT language="VBScript">
      MsgBox "Please enter a valid age", vbOKOnly, "Age verification"
          </SCRIPT>
          <%
      Age = False
   Else
       Age = True
   End If
End Function
0
 

Author Comment

by:AlexKalkakos
ID: 6286940
I put the above code in my .asp file. It compiles OK but the message doesn't appear. My .asp now looks like this:

<%
Option Explicit
Dim TheMessage
Dim MyFV
If IsEmpty(Request.Form("Submit")) Then
     TheMessage = "Please complete all the fields on the page"
else
     set MyFV = Server.CreateObject("FieldValidation.FVProcs")
     If not MyFV.EmailAddress(Request.Form("EmailAddress")) Then
          TheMessage = "Email Address is not valid!"
     End If
     If not MyFV.Age(Request.Form("Age")) Then
          TheMessage = TheMessage & " Age is not valid!"
     End If
     If not MyFV.BirthDate(Request.Form("BirthDate")) Then
          TheMessage = TheMessage & " Birth Date is not valid!"
     End If
     If not MyFV.Phone(Request.Form("Phone")) Then
          TheMessage = TheMessage & " Phone is not valid!"
     End If
     If not MyFV.ZipCode(Request.Form("ZipCode")) Then
          TheMessage = TheMessage & " Zip Code is not valid!"
     End If
     If len(TheMessage) = 0 Then
          TheMessage = "Your Data was accepted"
     End If
End If

Public Function Age(FieldToTest)
  If Not IsNumeric(FieldToTest) Then
 %>        
<SCRIPT language="VBScript">      
  MsgBox "Please enter a valid age", vbOKOnly, "Age verification"      
   </SCRIPT>        
<%            
Age = False
 ElseIf CInt(FieldToTest) < 0 Or CInt(FieldToTest) > 130 Then  
%>        
 <SCRIPT language="VBScript">    
 MsgBox "Please enter a valid age", vbOKOnly, "Age verification"        
</SCRIPT>        
 <%  
  Age = False
 Else    
  Age = True  
End If
End Function

%>

html code.......
0
 
LVL 33

Expert Comment

by:hongjun
ID: 6287982
AlexKalkakos, did you call the Age function?

hongjun
0
 
LVL 33

Expert Comment

by:hongjun
ID: 6287984
Doing a MsgBox in the server side results in Access Denied error.

To solve that (you actually know) is to use the below outside the <%..%> tag.
<script language=VBScript>
MsgBox "haha"
</script>

This will do the MsgBox in the client side.

hongjun
0
 

Author Comment

by:AlexKalkakos
ID: 6289226
I put directly the litle script below:

<script language=VBScript>
MsgBox "haha"
</script>

in my asp file, outside the <% %> tags and it worked almost OK. The only problem is that in order to close it I puss the OK button twice. What could be wrong? Below is what I did:

<%
Option Explicit
Dim TheMessage
Dim MyFV
If IsEmpty(Request.Form("Submit")) Then
     TheMessage = "Please complete all the fields on the page"
else
     set MyFV = Server.CreateObject("FieldValidation.FVProcs")
     If not MyFV.EmailAddress(Request.Form("EmailAddress")) Then
          TheMessage = "Email Address is not valid!"
     End If
     If not MyFV.Age(Request.Form("Age")) Then
     TheMessage = TheMessage & " Age is not valid!" %>    
         
          <SCRIPT language="VBScript">
          MsgBox "Please enter a valid age", vbOKOnly, "Age verification"      
          </SCRIPT>
         
     <%
     End If
     If not MyFV.BirthDate(Request.Form("BirthDate")) Then
          TheMessage = TheMessage & " Birth Date is not valid!"
     End If
     If not MyFV.Phone(Request.Form("Phone")) Then
          TheMessage = TheMessage & " Phone is not valid!"
     End If
     If not MyFV.ZipCode(Request.Form("ZipCode")) Then
          TheMessage = TheMessage & " Zip Code is not valid!"
     End If
     If len(TheMessage) = 0 Then
          TheMessage = "Your Data was accepted"
     End If
End If

 
%>
0
 

Author Comment

by:AlexKalkakos
ID: 6299472
Well it didn't work as was but from the above hints I manage to to something. Below is what I did using another example:

<%
Option Explicit
Dim MyOnlineStore
Set MyOnlineStore = Server.CreateObject("OnlineStore.OnlineStoreProcs")
'MyOnlineStore.RecordHit Session, "Check Out"
%>
   
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 FINAL//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
<META NAME="Generator" CONTENT="NetObjects Fusion 4.0.1 for Windows">
<TITLE>Check Out</TITLE>
</HEAD>

<SCRIPT language="VBScript">
            Function PlaceOrder_OnClick()
            If MyForm.Email.value = "" Then
            MsgBox "Please enter a valid email", vbOKOnly, "Email verification"
            End If
            End Function
          
            </SCRIPT>  
<BODY BGCOLOR="#ffffff" LINK="#0000ff" VLINK="#800080" TEXT="#000000" TOPMARGIN=0 LEFTMARGIN=0 MARGINWIDTH="0" MARGINHEIGHT="0">
   
    <p>&nbsp;<p>
   
    <FORM NAME=MyForm ACTION="./receipt.asp" METHOD=post>
   
   
           <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=615>
            <TR VALIGN=top ALIGN=left>
                <TD WIDTH=15 HEIGHT=15><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                <TD></TD>
            </TR>
            <TR VALIGN=top ALIGN=left>
                <TD HEIGHT=25></TD>
                <TD WIDTH=600><IMG id=Banner2 height=25 alt="Check Out" src="../assets/images/autogen/Check_Out_NElementalBanner.GIF" width=600 border=0 ></TD>
            </TR>
        </TABLE>
        <TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0 WIDTH=615>
            <TR VALIGN=top ALIGN=left>
                <TD>
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=210>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=15><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                            <TD WIDTH=195  BGCOLOR="#ffffcc" BACKGROUND="../assets/images/58.jpg">
                                <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=195>
                                    <TR>
                                    <TD><P ALIGN=center><A href="./catalog_menu.asp"><B><FONT SIZE="-1" FACE="Arial,Helvetica,Univers,Zurich BT">Online Catalog</FONT></B></A></P></TD>
                                    </TR>
                                </TABLE>
                            </TD>
                        </TR>
                    </TABLE>
                </TD>
                <TD>
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=210>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=210  BGCOLOR="#ffffcc" BACKGROUND="../assets/images/am.jpg">
                                <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=210>
                                    <TR>
                                        <TD><P ALIGN=center><A href="../html/shopping_cart.asp"><B><FONT SIZE="-1" FACE="Arial,Helvetica,Univers,Zurich BT">Shopping Cart</FONT></B></A></P></TD>
                                    </TR>
                                </TABLE>
                            </TD>
                        </TR>
                    </TABLE>
                </TD>
                <TD>
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=195>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=195  BGCOLOR="#ffffcc" BACKGROUND="../assets/images/back.jpg">
                                <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=195>
                                    <TR>
                                        <TD><P ALIGN=center><A href="../html/support.asp"><B><FONT SIZE="-1" FACE="Arial,Helvetica,Univers,Zurich BT">Support</FONT></B></A></P></TD>
                                    </TR>
                                </TABLE>
                            </TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
        </TABLE>
        <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=615>
            <TR VALIGN=top ALIGN=left>
                <TD WIDTH=15><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                <TD WIDTH=600  BGCOLOR="#000000">
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=600>
                        <TR>
                            <TD><P ALIGN=center><B><FONT COLOR="#ffffff" SIZE="+1" FACE="Arial,Helvetica,Univers,Zurich BT">Enter each field below to Check Out</FONT></B></P></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
        </TABLE>
        <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=270>
            <TR VALIGN=top ALIGN=left>
                <TD WIDTH=15 HEIGHT=8><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                <TD WIDTH=255><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=255 border=0></TD>
            </TR>
            <TR VALIGN=top ALIGN=left>
                <TD></TD>
                <TD WIDTH=255><P>Order Total: <% Response.Write FormatCurrency(MyOnlineStore.GetOrderTotal(Session)) %></P></TD>
            </TR>
        </TABLE>
        <TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0 WIDTH=430>
            <TR VALIGN=top ALIGN=left>
                <TD>
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=135>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=15 HEIGHT=11><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                            <TD WIDTH=120><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=120 border=0></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>Your Name</P> </TD>
                        </TR>
                    </TABLE>
                </TD>
                <TD>
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=295>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=15 HEIGHT=11><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                            <TD></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280><INPUT ID="FormsEditField1" NAME="YourName" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                    </TABLE>
                </TD>
            </TR>
        </TABLE>
        <TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0 WIDTH=430>
            <TR VALIGN=top ALIGN=left>
                <TD>
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=143>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=15 HEIGHT=8><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=15 border=0></TD>
                            <TD WIDTH=120><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=120 border=0></TD>
                            <TD WIDTH=8><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=8 border=0></TD>
                        </TR>
                       
                       
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>Email</P></TD>
                            <TD></TD>
                        </TR>
                                                                   
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=11></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>Address</P></TD>
                            <TD></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=16></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>City, State Zip</P>  </TD>
                            <TD></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=11></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>Phone Number</P> </TD>
                            <TD></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=18></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>Credit Card Type</P>  </TD>
                            <TD></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=9></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=128 COLSPAN=2><P>Credit Card Number</P>  </TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=11></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD></TD>
                            <TD WIDTH=120><P>Expiration Date</P> </TD>
                            <TD></TD>
                        </TR>
                    </TABLE>
                </TD>
                <TD>
               
               
               
                    <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=287>
                        <TR VALIGN=top ALIGN=left>
                            <TD WIDTH=7 HEIGHT=8><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=7 border=0></TD>
                            <TD></TD>
                            <TD WIDTH=163><IMG height=1 src="../assets/images/autogen/clearpixel.gif" width=163 border=0></TD>
                        </TR>
                       
                       
                                               
                        <TR VALIGN=top ALIGN=left>
                             <TD HEIGHT=22></TD>
                                           <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField2" NAME="Email" SIZE=35 MAXLENGTH=35 ></TD>
                                           <TD></TD>
                         </TR>
                                     <TR VALIGN=top ALIGN=left>
                                           <TD COLSPAN=3 HEIGHT=8></TD>
                                     </TR>
                       
                       
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField3" NAME="Address" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=8></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField4" NAME="CSZ" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=8></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField5" NAME="PhoneNumber" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=10></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField6" NAME="CreditCardType" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=6></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField7" NAME="CreditCardNumber" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=8></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=22></TD>
                            <TD WIDTH=280 COLSPAN=2><INPUT ID="FormsEditField8" NAME="ExpirationDate" SIZE=35 MAXLENGTH=35 ></TD>
                        </TR>
                        <TR VALIGN=top ALIGN=left>
                            <TD COLSPAN=3 HEIGHT=8></TD>
                        </TR>
                       
                        <TR VALIGN=top ALIGN=left>
                            <TD HEIGHT=24></TD>
                            <TD WIDTH=117><INPUT TYPE=submit NAME="PlaceOrder" VALUE="Place Order"  ID="FormsButton1"></TD>
                            <TD></TD>
                        </TR>
                                                     
                             
                                                                     
                    </TABLE>
                   
                </TD>
            </TR>
        </TABLE>
    </FORM></p>
</BODY>
</HTML>
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:   The Exchange of informatio…
I would like to start this tip/trick by saying Thank You, to all who said that this could not be done, as it forced me to make sure that it could be accomplished. :) To start, I want to make sure everyone understands the importance of utilizing p…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…
In this video, Percona Solution Engineer Rick Golba discuss how (and why) you implement high availability in a database environment. To discuss how Percona Consulting can help with your design and architecture needs for your database and infrastr…

764 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question