access memo field

Forums

My Profile

Inbox

Address Book

My Subscription

My Forums

access memo field

Logged in as: Guest

arrSession:exec spGetSession 2,3,37103

	Active Users: There are 0 members and 0 guests.
	Users viewing this topic: none

Printable Version

All Forums >> [Scripting] >> ASP >> access memo field
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!

Page: [1]

Message

<< Older Topic Newer Topic >>

access memo field - 8/19/2006 8:45:39 AM

madmanbean

Posts: 1
Score: 0
Joined: 8/19/2006
Status: offline

Am pretty new to vb and tring to sort a databse page using front page (sorry!) Am trying to sidplat access databse results and it seems that my page wil not show data froma a memo field..the message received is "Microsoft VBScript runtime error '800a01a8'
Object required: ''

the relevent code is below..

<table border="1" id="table1">
    <tbody>
     
<% if 0 then %>
<SCRIPT Language="JavaScript">
document.write("<div style='background: yellow; color: black;'>The Database Results component on this page is unable to display database content. The page must have a filename ending in '.asp', and the web must be hosted on a server that supports Active Server Pages.</div>");
</SCRIPT>
<% end if %>
<%
fp_sQry="SELECT * FROM aparts"
fp_sDefault=""
fp_sNoRecords="<tr><td colspan=12 align=""LEFT"" width=""100%"">No records returned.</td></tr>"
fp_sDataConn="Database1"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=5
fp_fTableFormat=True
fp_fMenuFormat=False
fp_sMenuChoice="price"
fp_sMenuValue="price"
fp_sColTypes="&ID=3&property_code=202&street_name=202&district=202&area_m=202&rooms=3&floor=3&price=6&description=203&image_main=203&image_2=203&image_3=203&image_4=203&residential_commercial=202&property_type=202&sale_rent=202&client_type=202&client_name=202&client_contact_number=202&client_address=203&client_email=202&full_address=203&commission=3&date_sold=202&buyer_name=202&buyer_address=203&buyer_number=202&price_paid=6&commission_earnt=3&"
fp_iDisplayCols=12
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>

<tr>
      <td>&nbsp;<table width="95%"  border="0" align="center" cellpadding="3" cellspacing="0" id="table2">
            <tr>
              <td><div align="right">Price in Euros </div></td>
              <td><div align="left"><%=FP_FieldVal(fp_rs,"price")%></div></td>
            </tr>
            <% 
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) 
%>
            <tr>
              <td colspan="2" height="9"><%=FP_FieldVal(fp_rs,"description")%></td>
            </tr>
            <tr>
              <td width="50%"><div align="right">Property Number </div></td>
              <td width="50%"><%=FP_FieldVal(fp_rs,"property_code")%></td>
            </tr>
            <tr>
              <td><div align="right">District</div></td>
              <td><%=FP_FieldVal(fp_rs,"district")%></td>
            </tr>
            <tr>
              <td><div align="right">Street name </div></td>
              <td><%=FP_FieldVal(fp_rs,"street_name")%></td>
            </tr>
            <tr>
              <td><div align="right">Floor Area </div></td>
              <td><%=FP_FieldVal(fp_rs,"area_m")%></td>
            </tr>
            <tr>
              <td><div align="right">Number of Rooms </div></td>
              <td><%=FP_FieldVal(fp_rs,"rooms")%></td>
            </tr>
            <tr>
              <td colspan="2" height="39"><div align="center"><%=FP_FieldVal(fp_rs,"image_main")%></div></td>
            </tr>
            <tr align="center" valign="middle">
              <td colspan="2"><table width="300"  border="0" cellspacing="0" cellpadding="3" id="table3">
                <tr>
                  <td width="100" height="75"><div align="center"><%=FP_FieldVal(fp_rs,"image_2")%></div></td>
                  <td width="100" height="75"><div align="center"><%=FP_FieldVal(fp_rs,"image_3")%></div></td>
                  <td width="100" height="75"><div align="center"><%=FP_FieldVal(fp_rs,"image_4")%></div></td>
                </tr>
              </table>
              <br>
              Click on a thumbnail to view larger image </td>
            </tr>
            <tr>
              <td colspan="2"><A HREF="<%=MM_moveNext%>">Next</A></td>
            </tr>
            <% 
 Repeat1__index=Repeat1__index+1
 Repeat1__numRows=Repeat1__numRows-1
 Recordset1.MoveNext()
Wend
%>
            <tr>
              <td colspan="2"><div align="center">To find out more about this property do call us on 01491 ???? </div></td>
            </tr>
            <tr>
              <td colspan="2">&nbsp;</td>
            </tr>
            </table>
               <p>&nbsp;</p>
      <p>&nbsp;</td>
     </tr>
     
</tbody>
   </table>

any help suggestions or ideas most appreciated from those wiser than me!!

EDIT(EBGREEN) - Code tags FTW.