home hardware prices news articles forums photos user reviews
Go Back   Tech Support Forums - TechIMO.com > PC Hardware and Tech > Webmastering and Programming
Exporting Access database Form to ASP Exporting Access database Form to ASP
Join TechIMO for Free!
Register Blogs FAQ Members List Calendar Search Today's Posts Mark Forums Read
Reply Get bargains at  »  Dealighted.com
 
Thread Tools
Currently Active Users: 2870
Discussions: 188,380, Posts: 2,243,463, Members: 232,608
Old November 5th, 2002, 06:59 PM   Digg it!   #1 (permalink)
Cruizing
 
Join Date: Oct 2001
Location: Wellington, NZ
Posts: 4,398
Exporting Access database Form to ASP
I have gone through the process to get this done, following the instructions in the help very closely but it is not displaying properly

Contacts2.asp

Code:
<html>
<head>
<title>TiS Contacts</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFF00" text="#000000" link="#000000" vlink="#000000" alink="#000000">
<img src="logo.gif">
<OBJECT ID="Contactsalx"
CLASSID="CLSID:812AE312-8B8E-11CF-93C8-00AA00C08FDF"
STYLE="TOP:0;LEFT:0;">
<PARAM NAME="ALXPATH" VALUE="192.168.0.5\Contactsalx.asp">
</OBJECT>
</body>
</html>
displays like the attached
Attached Thumbnails
exporting-access-database-form-asp-help.gif  

VERT is offline   Reply With Quote
Old November 5th, 2002, 07:03 PM     #2 (permalink)
Cruizing
 
Join Date: Oct 2001
Location: Wellington, NZ
Posts: 4,398
This is the code that MS Access generated for Contactsalx.asp which is called upon in Contacts2.asp

Code:
<%
If IsObject(Session("tis_conn")) Then
    Set conn = Session("tis_conn")
Else
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.open "tis","",""
    Set Session("tis_conn") = conn
End If
%>
<%
If IsObject(Session("Form_Contacts_rs")) Then
    Set rs = Session("Form_Contacts_rs")
Else
    sql = "SELECT * FROM [Contacts]"
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open sql, conn, 3, 3
    If rs.eof Then
        rs.AddNew
    End If
    Set Session("Form_Contacts_rs") = rs
End If
%>
<SCRIPT LANGUAGE=VBScript>
<!--
Dim rgszCtrls(21, 2)
Dim cMaxCtrls
cMaxCtrls = 21
Sub AddCtrlToList(szCtrl, szCtrlSrc)
    Dim i
    for i = 1 to cMaxCtrls
        if rgszCtrls(i, 1) = szCtrl Then Exit Sub
        if rgszCtrls(i, 1) = "" Then
            rgszCtrls(i, 1) = szCtrl
            rgszCtrls(i, 2) = szCtrlSrc
            Exit Sub
        End If
    next
End Sub

Sub UpdateRefreshBtn()
    nav_btn_MoveCancelUpdate.Caption = "Cancel"
End Sub

Function MakeHTMLValue(szVal)
    Dim i
    Dim szRet
    for i = 1 to Len(szVal)
        ch = Mid(szVal, i, 1)
        if ch = " " Then
            szRet = szRet & "%20"
        elseif ch = "&" Then
            szRet = szRet & "%26"
        elseif ch = "#" Then
            szRet = szRet & "%23"
        elseif ch = """" Then
            szRet = szRet & "%22"
        elseif ch = ";" Then
            szRet = szRet & "%3B"
        elseif ch = ":" Then
            szRet = szRet & "%3A"
        elseif ch = "'" Then
            szRet = szRet & "%27"
        else
            szRet = szRet & Mid(szVal, i, 1)
        end if
    next
    MakeHTMLValue = szRet
End Function

Function GetCtrlQueryString()
    Dim szRet
    Dim i
    for i = 1 to cMaxCtrls
        if rgszCtrls(i, 1) = "" Then Exit For
        szRet = szRet & rgszCtrls(i, 2) & "=" & MakeHTMLValue(Contactsalx.Controls(rgszCtrls(i, 1)).Value) & "&"
    next
    GetCtrlQueryString = szRet
End Function

Sub Contactsalx_OnLoad()
End Sub

Sub Notes_AfterUpdate()
    call AddCtrlToList("Notes", "Notes")
    call UpdateRefreshBtn()
End Sub

Sub Website_AfterUpdate()
    call AddCtrlToList("Website", "Website")
    call UpdateRefreshBtn()
End Sub

Sub Email_AfterUpdate()
    call AddCtrlToList("Email", "Email")
    call UpdateRefreshBtn()
End Sub

Sub Birthdate_AfterUpdate()
    call AddCtrlToList("Birthdate", "Birthdate")
    call UpdateRefreshBtn()
End Sub

Sub Fax_AfterUpdate()
    call AddCtrlToList("Fax", "Fax")
    call UpdateRefreshBtn()
End Sub

Sub Mobile_AfterUpdate()
    call AddCtrlToList("Mobile", "Mobile")
    call UpdateRefreshBtn()
End Sub

Sub Phone_AfterUpdate()
    call AddCtrlToList("Phone", "Phone")
    call UpdateRefreshBtn()
End Sub

Sub Address_AfterUpdate()
    call AddCtrlToList("Address", "Address")
    call UpdateRefreshBtn()
End Sub

Sub Contact_AfterUpdate()
    call AddCtrlToList("Contact", "Contact")
    call UpdateRefreshBtn()
End Sub

Sub Business_AfterUpdate()
    call AddCtrlToList("Business", "Business")
    call UpdateRefreshBtn()
End Sub

Sub ContactID_AfterUpdate()
    call AddCtrlToList("ContactID", "ContactID")
    call UpdateRefreshBtn()
End Sub

Sub nav_btn_MoveFirstRecord_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveFirstRecord&" & GetCtrlQueryString()
End Sub

Sub nav_btn_MovePrevRecord_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MovePrevRecord&" & GetCtrlQueryString()
End Sub

Sub nav_btn_MoveNextRecord_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveNextRecord&" & GetCtrlQueryString()
End Sub

Sub nav_btn_MoveLastRecord_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveLastRecord&" & GetCtrlQueryString()
End Sub

Sub nav_btn_MoveAddRecord_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveAddRecord&" & GetCtrlQueryString()
End Sub

Sub nav_btn_MoveCommitRecord_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveCommitRecord&" & GetCtrlQueryString()
End Sub

Sub nav_btn_MoveCancelUpdate_Click()
    Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveCancelUpdate&"
End Sub

Sub nav_btn_MoveDeleteRecord_Click()
    If MsgBox("Press OK to delete current record", 1, "Contacts") =1 Then
        Window.Location.Href = "192.168.0.5/Contacts.asp?nav_btn=nav_btn_MoveDeleteRecord&"
    End If
End Sub
VERT is offline   Reply With Quote
Old November 5th, 2002, 07:04 PM     #3 (permalink)
Cruizing
 
Join Date: Oct 2001
Location: Wellington, NZ
Posts: 4,398
code continued


Code:
-->
</SCRIPT>
<DIV ID="Contactsalx" STYLE="LAYOUT:FIXED;HEIGHT:545;WIDTH:928;">
<OBJECT ID="Notes"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:415;LEFT:10;WIDTH:904;HEIGHT:64;TABINDEX:10;ZINDEX:0;">
<%If Not IsNull(rs.Fields("Notes").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Notes").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="23504;1664">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Notes_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:390;LEFT:10;WIDTH:763;HEIGHT:25;ZINDEX:1;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Notes">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="19838;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Website"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:358;LEFT:10;WIDTH:904;HEIGHT:30;TABINDEX:9;ZINDEX:2;">
<%If Not IsNull(rs.Fields("Website").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Website").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="23504;780">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Website_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:333;LEFT:10;WIDTH:763;HEIGHT:25;ZINDEX:3;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Website">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="19838;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Email"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:305;LEFT:628;WIDTH:286;HEIGHT:28;TABINDEX:8;ZINDEX:4;">
<%If Not IsNull(rs.Fields("Email").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Email").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="7436;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Email_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:279;LEFT:730;WIDTH:180;HEIGHT:25;ZINDEX:5;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Email">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="4680;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Birthdate"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:160;LEFT:769;WIDTH:145;HEIGHT:28;TABINDEX:7;ZINDEX:6;">
<%If Not IsNull(rs.Fields("Birthdate").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Birthdate").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="3770;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Birthdate_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:135;LEFT:769;WIDTH:145;HEIGHT:25;ZINDEX:7;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Birthdate">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="3770;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Fax"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:305;LEFT:396;WIDTH:235;HEIGHT:28;TABINDEX:6;ZINDEX:8;">
<%If Not IsNull(rs.Fields("Fax").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Fax").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="6110;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Fax_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:279;LEFT:400;WIDTH:231;HEIGHT:25;ZINDEX:9;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Fax">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="6006;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Mobile"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:304;LEFT:241;WIDTH:156;HEIGHT:28;TABINDEX:5;ZINDEX:10;">
<%If Not IsNull(rs.Fields("Mobile").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Mobile").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="4056;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Mobile_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:279;LEFT:241;WIDTH:156;HEIGHT:25;ZINDEX:11;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Mobile">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="4056;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Phone"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:304;LEFT:10;WIDTH:231;HEIGHT:28;TABINDEX:4;ZINDEX:12;">
<%If Not IsNull(rs.Fields("Phone").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Phone").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="6006;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Phone_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:279;LEFT:10;WIDTH:231;HEIGHT:25;ZINDEX:13;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Phone">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="6006;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Address"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:214;LEFT:10;WIDTH:904;HEIGHT:64;TABINDEX:3;ZINDEX:14;">
<%If Not IsNull(rs.Fields("Address").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Address").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="23504;1664">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Address_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:189;LEFT:10;WIDTH:763;HEIGHT:25;ZINDEX:15;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Address">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="19838;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Contact"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:160;LEFT:406;WIDTH:362;HEIGHT:28;TABINDEX:2;ZINDEX:16;">
<%If Not IsNull(rs.Fields("Contact").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Contact").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="9412;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Contact_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:135;LEFT:406;WIDTH:362;HEIGHT:25;ZINDEX:17;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Contact">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="9412;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="Business"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:161;LEFT:107;WIDTH:303;HEIGHT:30;TABINDEX:1;ZINDEX:18;">
<%If Not IsNull(rs.Fields("Business").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("Business").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="16777215">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="7878;780">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="Business_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:135;LEFT:108;WIDTH:301;HEIGHT:25;ZINDEX:19;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="Business">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="7826;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="ContactID"
CLASSID="CLSID:8BD21D10-EC42-11CE-9E0D-00AA006002F3"
STYLE="TOP:161;LEFT:16;WIDTH:89;HEIGHT:28;TABINDEX:0;ZINDEX:20;">
<%If Not IsNull(rs.Fields("ContactID").Value) Then%>
<PARAM NAME="Value" VALUE="<%=Server.HTMLEncode(rs.Fields("ContactID").Value)%>">
<%End If%>
<PARAM NAME="BackStyle" VALUE="1">
<PARAM NAME="BackColor" VALUE="65535">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="160">
<PARAM NAME="Font" VALUE="MS Sans Serif">
<PARAM NAME="FontName" VALUE="MS Sans Serif">
<PARAM NAME="Size" VALUE="2314;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2894088219">
</OBJECT>
<OBJECT ID="ContactID_Label"
CLASSID="CLSID:978C9E23-D4B0-11CE-BF2D-00AA003F40D0"
STYLE="TOP:136;LEFT:16;WIDTH:90;HEIGHT:25;ZINDEX:21;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="BorderStyle" VALUE="1">
<PARAM NAME="BorderColor" VALUE="65535">
<PARAM NAME="Caption" VALUE="#">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="FontHeight" VALUE="200">
<PARAM NAME="FontWeight" VALUE="700">
<PARAM NAME="FontName" VALUE="Verdana">
<PARAM NAME="Size" VALUE="2340;650">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="8388627">
<PARAM NAME="FontEffects" VALUE="1">
</OBJECT>
<OBJECT ID="nav_btn_MoveCancelUpdate"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:336;WIDTH:84;HEIGHT:28;ZINDEX:0;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="Refresh">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="2184;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MoveDeleteRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:252;WIDTH:84;HEIGHT:28;ZINDEX:1;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="Delete">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="2184;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MoveCommitRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:168;WIDTH:84;HEIGHT:28;ZINDEX:2;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="Commit">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="2184;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MoveAddRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:112;WIDTH:28;HEIGHT:28;ZINDEX:3;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="&gt;*">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="728;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MoveLastRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:84;WIDTH:28;HEIGHT:28;ZINDEX:4;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="&gt;|">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="728;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MoveNextRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:56;WIDTH:28;HEIGHT:28;ZINDEX:5;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="&gt;">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="728;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MovePrevRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:28;WIDTH:28;HEIGHT:28;ZINDEX:6;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="&lt;">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="728;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
<OBJECT ID="nav_btn_MoveFirstRecord"
CLASSID="CLSID:D7053240-CE69-11CD-A777-00DD01143C57"
STYLE="TOP:517;LEFT:0;WIDTH:28;HEIGHT:28;ZINDEX:7;">
<PARAM NAME="BackStyle" VALUE="0">
<PARAM NAME="Caption" VALUE="|&lt;">
<PARAM NAME="ParagraphAlign" VALUE="3">
<PARAM NAME="ForeColor" VALUE="0">
<PARAM NAME="Size" VALUE="728;728">
<PARAM NAME="SpecialEffect" VALUE="0">
<PARAM NAME="VariousPropertyBits" VALUE="2">
</OBJECT>
</DIV>

I am using Personal Webserver in Win98 to host this page

Why wont it display properly?

Last edited by VERT : November 5th, 2002 at 08:41 PM.
VERT is offline   Reply With Quote
Reply

« trying to get an MS Access Form to work on PWS | need a news service »

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools

Posting Rules
You may post new threads
You may post replies
You may not post attachments
You may not edit your posts
vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off

Most Active Discussions
Is It Just Me? (2885)
The United States Debt (20)
Looks like Burris will get his Sena.. (8)
I think I just killed my computer w.. (24)
Upgrading RAM (5)
Folderchat Weekday thread (439)
Antec 300 bulk purchase? (11)
Worth the upgrade?? (14)
Help with an Ati Radeon HD 4850 512.. (25)
Recent Discussions
Building a gaming computer advi.. (1)
Best digital camera for under 2.. (14)
Help with an Ati Radeon HD 4850.. (25)
Install Problem for Windows Def.. (0)
New Build ( Finally ) (1)
dual monitors wont boot (0)
Folderchat Weekday thread (439)
MSN Hotmail Down??? (7)
Laptop waking up itself (0)
Blackberry Storm, Gears of War .. (1)
Core 2 Quad Q9550 system (3)
COWBOOM Ripoff! Used Laptop w/$.. (4)


All times are GMT -4. The time now is 08:44 PM.
TechIMO Copyright 2008 All Enthusiast, Inc.

Contact Us - Tech Support Forums - TechIMO.com - Archive - Privacy Statement - Terms of Use -
Coupons and Deals and Dealighted - Store Ratings and Reviews - Web Business Blog - Top


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28