|
| |
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
DRW Submission forms - 11/1/2003 15:53:04
I've used the DRW wizard in FP2002 to create a standard set of pages. I am able to create new records with empty form fields, and view all data in existing records, but when I attempt to update any records, the submission form returns the following error; ******************* Database Results Error Description: [Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE statement. Number: -2147217900 (0x80040E14) Source: Microsoft OLE DB Provider for ODBC Drivers One or more form fields were empty. You should provide default values for all form fields that are used in the query. ******************* I'm sure I've seen this before, but a search on this site comes up empty! How can I resolve this??? Regards, Ed
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/1/2003 16:07:18
Just to clarify things a bit, I am not using a DRW created database, but the additional fields, including Timestamp, were created automatically, although none of them appear in the code for the update.asp page.
< Message edited by emoss2 -- 11/1/2003 4:25:20 PM >
|
|
|
|
BeTheBall
Posts: 6493 Joined: 6/21/2002 From: West Point Utah USA Status: offline
|
RE: DRW Submission forms - 11/1/2003 19:35:11
Can you post the SQL code for your update page?
_____________________________
Duane Some people are like Slinkies . . . Not really good for anything . . . . . But they still bring a smile to your face when you push them down a flight of stairs.
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 10:25:36
Here's the code... Ed
<html>
<head>
<% ' FP_ASP -- ASP Automatically generated by a Frontpage Component. Do not Edit.
FP_CharSet = "windows-1252"
FP_CodePage = 1252 %>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>tblReportData -- Updated Record</title>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
</head>
<body bgcolor="#FFFFFF">
<!--webbot bot="PurpleText" PREVIEW="-Important- If you modify this Database Results region using the Database Results Wizard, then your Database Editor will no longer work. If you accidentally open the Database Results Wizard, simply click Cancel to exit without regenerating the Database Results region." -->
<script Language="JavaScript">
<!--
top.list.location.href = top.list.location.href;
// -->
</script>
<!--webbot bot="DatabaseRegionStart" s-columnnames s-columntypes s-dataconnection="TBIR" b-tableformat="FALSE" b-menuformat="FALSE" s-menuchoice s-menuvalue b-tableborder="TRUE" b-tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="FALSE" b-listseparator="FALSE" i-ListFormat="0" b-makeform="FALSE" s-RecordSource s-displaycolumns s-criteria s-order s-sql="UPDATE tblReportData SET RptDate = '::RptDate::' , Company = '::Company::' , Symbol = '::Symbol::' , Sector = '::Sector::' , Industry = '::Industry::' , Exchange = '::Exchange::' , BValue = '::BValue::' , CPrice = '::CPrice::' , TBIRrating = '::TBIRrating::' , CCapsule = '::CCapsule::' , Comp = '::Comp::' , ShareItems = '::ShareItems::' , own = '::own::' , dands = '::dands::' , fsum = '::fsum::' , Income = '::Income::' , Hrev = '::Hrev::' , Hearn = '::Hearn::' , Headlines = '::Headlines::' , earnper = '::earnper::' , fyear = '::fyear::' , cbrok = '::cbrok::' , cbrok1 = '::cbrok1::' , cbrok2 = '::cbrok2::' , cbrok3 = '::cbrok3::' , cbrok4 = '::cbrok4::' , tbirshort = '::tbirshort::' , tbirlong = '::tbirlong::' , tbir invstrat = '::Field30::' WHERE (RptID = ::RptID::)" b-procedure="FALSE" clientside SuggestedExt="asp" s-DefaultFields="RptDate=&Company=&Symbol=&Sector=&Industry=&Exchange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=&ShareItems=&own=&dands=&fsum=&Income=&Hrev=&Hearn=&Headlines=&earnper=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=&cbrok4=&tbirshort=&tbirlong=&tbir invstrat=&RptID=0" s-NoRecordsFound="Record updated in table." i-MaxRecords="1" i-GroupSize="0" u-dblib="../../../_fpclass/fpdblib.inc" u-dbrgn1="../../../_fpclass/fpdbrgn1.inc" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" Tag="BODY" startspan BOTID="0" preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00" align="left"><font color="#000000">This is the start of a Database Results region.</font></td></tr></table>" --><!--#include file="../../../_fpclass/fpdblib.inc"-->
<% 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="UPDATE tblReportData SET RptDate = '::RptDate::' , Company = '::Company::' , Symbol = '::Symbol::' , Sector = '::Sector::' , Industry = '::Industry::' , Exchange = '::Exchange::' , BValue = '::BValue::' , CPrice = '::CPrice::' , TBIRrating = '::TBIRrating::' , CCapsule = '::CCapsule::' , Comp = '::Comp::' , ShareItems = '::ShareItems::' , own = '::own::' , dands = '::dands::' , fsum = '::fsum::' , Income = '::Income::' , Hrev = '::Hrev::' , Hearn = '::Hearn::' , Headlines = '::Headlines::' , earnper = '::earnper::' , fyear = '::fyear::' , cbrok = '::cbrok::' , cbrok1 = '::cbrok1::' , cbrok2 = '::cbrok2::' , cbrok3 = '::cbrok3::' , cbrok4 = '::cbrok4::' , tbirshort = '::tbirshort::' , tbirlong = '::tbirlong::' , tbir invstrat = '::Field30::' WHERE (RptID = ::RptID::)"
fp_sDefault="RptDate=&Company=&Symbol=&Sector=&Industry=&Exchange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=&ShareItems=&own=&dands=&fsum=&Income=&Hrev=&Hearn=&Headlines=&earnper=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=&cbrok4=&tbirshort=&tbirlong=&tbir invstrat=&RptID=0"
fp_sNoRecords="Record updated in table."
fp_sDataConn="TBIR"
fp_iMaxRecords=1
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=False
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_iDisplayCols=16
fp_fCustomQuery=True
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file="../../../_fpclass/fpdbrgn1.inc"-->
<!--webbot bot="DatabaseRegionStart" endspan i-checksum="17927" -->
<p><!--webbot bot="PurpleText" PREVIEW="This is the UPDATE query." --></p>
<!--webbot bot="DatabaseRegionEnd" b-tableformat="FALSE" b-menuformat="FALSE" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" i-groupsize="0" clientside Tag="BODY" startspan preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00" align="left"><font color="#000000">This is the end of a Database Results region.</font></td></tr></table>" --><!--#include file="../../../_fpclass/fpdbrgn2.inc"-->
<!--webbot bot="DatabaseRegionEnd" endspan i-checksum="9297" -->
</body>
</html>
|
|
|
|
BeTheBall
Posts: 6493 Joined: 6/21/2002 From: West Point Utah USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 11:17:59
Assuming RptDate is a Date field in your DB, your SQL will need to be changed to read RptDate = #::RptDate::# instead of RptDate = '::RptDate::' Since you have not "dieted" your code, make the above change in the gray code where it currently reads: s-sql="UPDATE tblReportData SET RptDate = '::RptDate::' Does that make sense?
_____________________________
Duane Some people are like Slinkies . . . Not really good for anything . . . . . But they still bring a smile to your face when you push them down a flight of stairs.
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 12:04:55
I changed the code, as indicated below, but I still get the same error message... <!--webbot bot="DatabaseRegionStart" s-columnnames s-columntypes s-dataconnection="TBIR" b-tableformat="FALSE" b-menuformat="FALSE" s-menuchoice s-menuvalue b-tableborder="TRUE" b-tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="FALSE" b-listseparator="FALSE" i-ListFormat="0" b-makeform="FALSE" s-RecordSource s-displaycolumns s-criteria s-order s-sql="UPDATE tblReportData SET RptDate = #::RptDate::# , Company = '::Company::' , Symbol = '::Symbol::' , Sector = '::Sector::' , Industry = '::Industry::' , Exchange = '::Exchange::' , BValue = '::BValue::' , CPrice = '::CPrice::' , TBIRrating = '::TBIRrating::' , CCapsule = '::CCapsule::' , Comp = '::Comp::' , ShareItems = '::ShareItems::' , own = '::own::' , dands = '::dands::' , fsum = '::fsum::' , Income = '::Income::' , Hrev = '::Hrev::' , Hearn = '::Hearn::' , Headlines = '::Headlines::' , earnper = '::earnper::' , fyear = '::fyear::' , cbrok = '::cbrok::' , cbrok1 = '::cbrok1::' , cbrok2 = '::cbrok2::' , cbrok3 = '::cbrok3::' , cbrok4 = '::cbrok4::' , tbirshort = '::tbirshort::' , tbirlong = '::tbirlong::' , tbir invstrat = '::Field30::' WHERE (RptID = ::RptID::)" b-procedure="FALSE" clientside SuggestedExt="asp" s-DefaultFields="RptDate=&Company=&Symbol=&Sector=&Industry=&Exchange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=&ShareItems=&own=&dands=&fsum=&Income=&Hrev=&Hearn=&Headlines=&earnper=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=&cbrok4=&tbirshort=&tbirlong=&tbir invstrat=&RptID=0" s-NoRecordsFound="Record updated in table." i-MaxRecords="1" i-GroupSize="0" u-dblib="../../../_fpclass/fpdblib.inc" u-dbrgn1="../../../_fpclass/fpdbrgn1.inc" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" Tag="BODY" startspan BOTID="0" preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00" align="left"><font color="#000000">This is the start of a Database Results region.</font></td></tr></table>" --><!--#include file="../../../_fpclass/fpdblib.inc"-->
|
|
|
|
BeTheBall
Posts: 6493 Joined: 6/21/2002 From: West Point Utah USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 12:10:46
OK, next step. According to your SQL, all the fields in your Update statement, other than RptDate, are text. Is that true? That is one area where the DRW is lacking. It assumes all fields are text. If you have other date fields or numeric fields, then additional editing of your SQL will be needed.
_____________________________
Duane Some people are like Slinkies . . . Not really good for anything . . . . . But they still bring a smile to your face when you push them down a flight of stairs.
|
|
|
|
pmcoult
Posts: 8 Joined: 11/2/2003 Status: offline
|
RE: DRW Submission forms - 11/2/2003 12:52:33
I have had this same problem. I have now fixed my update form. By doing this! First make sure your database does not contain any of the microsoft referenced words, if so it will never work. Then make sure your database (in design view) has no hyperlinks fields, if it does change it to text, and then you can change it to (hyperlink) in your database results page. Last make sure the database will allow a zero length in the text field. This fixed my forms, maybe it will fix yours good luck.
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 13:11:34
My CPrice field is currency... all others are text or memo... Can I just change '::CPrice::' to #::CPrice::#, or is more needed ?
|
|
|
|
Long Island Lune
Posts: 2340 Joined: 6/8/2002 From: New York Status: offline
|
RE: DRW Submission forms - 11/2/2003 15:20:46
quote:
One or more form fields were empty. You should provide default values for all form fields that are used in the query. emoss2, You do not have to include every field in your SQL when you update a record. Are ALL these fields in your SQL changable by the user? In other words, if you have a table with 20 fields, but your only allowing the user to change 2 or 3 of them, you can create an UPDATE statment for just those 2 or 3 fields. quote:
My CPrice field is currency... all others are text or memo... Can I just change '::CPrice::' to #::CPrice::#, or is more needed ? Currency is like this: ::CPrice::
< Message edited by Long Island Lune -- 11/2/2003 7:38:47 PM >
_____________________________
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 16:01:56
All fields listed in the SQL need to be editable. I'm still stuck on this... When I enter sample data in all fields, then click the OK button, I get an error message indicating that the query syntax is incorrect....
|
|
|
|
BeTheBall
Posts: 6493 Joined: 6/21/2002 From: West Point Utah USA Status: offline
|
RE: DRW Submission forms - 11/2/2003 17:14:28
Try and response.write your SQL. Do this by placing this code in HTML view of your code, somewhere after your SQL in the body of the page: <%=fp_sQuery%> Then test the page to see what SQL is written. Also, did you make the change suggested by Long Island Lune, namely, deleting the single quotes around '::CPrice::'? While it is true that you normally only include the fields that are changing, often an empty date field can trigger an error.
_____________________________
Duane Some people are like Slinkies . . . Not really good for anything . . . . . But they still bring a smile to your face when you push them down a flight of stairs.
|
|
|
|
Long Island Lune
Posts: 2340 Joined: 6/8/2002 From: New York Status: offline
|
RE: DRW Submission forms - 11/2/2003 20:02:58
1): When you created your database, did you set the "Allow Zero Lenght" option for each field? This would not solve an inconsistancy in your SQL code. But would allow the UPDATE to work when data is sent to the database. 2): Are you absolutely sure that you spelled each field correctly in your SQL that match your database? quote:
Try and response.write your SQL. Do this by placing this code in HTML view of your code, somewhere after your SQL in the body of the page: <%=fp_sQuery%> You should do what Betheball suggested and print out the SQL on the page so you can SEE what the code is seeing. It's always best to see the problem first hand before trying to fix it. AAMOF, after the SQL has been displayed, cut copy and paste it here so we can see it. Try this: <!--webbot bot="DatabaseRegionStart" s-columnnames s-columntypes s-dataconnection="TBIR" b-tableformat="FALSE" b-menuformat="FALSE" s-menuchoice s-menuvalue b-tableborder="TRUE" b- tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="FALSE" b- listseparator="FALSE" i-ListFormat="0" b-makeform="FALSE" s- RecordSource s-displaycolumns s-criteria s-order s-sql="UPDATE tblReportData SET RptDate = '::RptDate::' , Company = '::Company::' , Symbol = '::Symbol::' , Sector = '::Sector::' , Industry = '::Industry::' , Exchange = '::Exchange::' , BValue = '::BValue::' , CPrice = '::CPrice::' , TBIRrating = '::TBIRrating::' , CCapsule = '::CCapsule::' , Comp = '::Comp::' , ShareItems = '::ShareItems::' , own = '::own::' , dands = '::dands::' , fsum = '::fsum::' , Income = '::Income::' , Hrev = '::Hrev::' , Hearn = '::Hearn::' , Headlines = '::Headlines::' , earnper = '::earnper::' , fyear = '::fyear::' , cbrok = '::cbrok::' , cbrok1 = '::cbrok1::' , cbrok2 = '::cbrok2::' , cbrok3 = '::cbrok3::' , cbrok4 = '::cbrok4::' , tbirshort = '::tbirshort::' , tbirlong = '::tbirlong::' , tbir invstrat = '::Field30::' WHERE (RptID = ::RptID::)" b-procedure="FALSE" clientside SuggestedExt="asp" s- DefaultFields="RptDate=&Company=&Symbol=&Sector=&Industry=&Exch ange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=&ShareItems =&own=&dands=&fsum=&Income=&Hrev=&Hearn=&Headlines=&earnpe r=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=&cbrok4=&tbirshort=&tbirl ong=&tbir invstrat=&RptID=0" s-NoRecordsFound="Record updated in table." i-MaxRecords="1" i-GroupSize="0" u- dblib="../../../_fpclass/fpdblib.inc" u- dbrgn1="../../../_fpclass/fpdbrgn1.inc" u- dbrgn2="../../../_fpclass/fpdbrgn2.inc" Tag="BODY" startspan BOTID="0" preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00" align="left"><font color="#000000">This is the start of a Database Results region.</font></td></tr></table>" --><!--#include file="../../../_fpclass/fpdblib.inc"--> <% 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 %> <% myQuery = "UPDATE tblReportData SET RptDate='::RptDate::', Company='::Company::' ,Symbol= '::Symbol::', Sector='::Sector::', Industry='::Industry::', Exchange='::Exchange::', BValue='::BValue::', CPrice='::CPrice::', TBIRrating='::TBIRrating::', CCapsule='::CCapsule::', Comp='::Comp::', ShareItems='::ShareItems::', own='::own::', dands='::dands::', fsum ='::fsum::', Income='::Income::', Hrev='::Hrev::', Hearn='::Hearn::', Headlines='::Headlines::', earnper='::earnper::', fyear= '::fyear::', cbrok='::cbrok::', cbrok1='::cbrok1::', cbrok2= '::cbrok2::', cbrok3='::cbrok3::', cbrok4='::cbrok4::', tbirshort='::tbirshort::', tbirlong= '::tbirlong::', tbir invstrat = '::Field30::' WHERE (RptID = ::RptID::)" Response.Write ("<BR>myQuery = " & myQuery & "<BR>" fp_sQry= myQuery fp_sDefault="RptDate=&Company=&Symbol=&Sector=&Industry= &Exchange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=& ShareItems=&own=&dands=&fsum=&Income=&Hrev=&Hearn=& Headlines=&earnper=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=& cbrok4=&tbirshort=&tbirlong=&tbir invstrat=&RptID=0" fp_sNoRecords="Record updated in table." fp_sDataConn="TBIR" fp_iMaxRecords=1 fp_iCommandType=1 fp_iPageSize=0 fp_fTableFormat=False fp_fMenuFormat=False fp_sMenuChoice="" fp_sMenuValue="" fp_iDisplayCols=16 fp_fCustomQuery=True BOTID=0 fp_iRegion=BOTID %> In blue above, that is not right. This is what Spooky saw. That has to be fixed.
_____________________________
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/3/2003 12:45:45
I've replaced all instances of tbir invstrat = '::Field30::' with tbirstrat = '::tibrstrat::' , and modified the code and DRW regions to include this field. I am now able to update records without an error message. Unfortunately, the data from this field, tibrstrat, and another new field I need, wssynop, are not being written back to the db... I will print out the code and see if I can spot any errors, and will post it here after I review it... Thanks to everyone for their help!... More to follow! Ed
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/3/2003 13:18:41
I added the <%=fp_sQuery%> code to the body of the update.asp page (below the SQL), but when I run the page by clicking the "OK" button on the edit.asp page, I still see the "Record updated inTable" message, and do not see any SQL generated that I can review. Exactly what do I need to do to see the SQL ? Here's the code from the update.asp page. I do not see any obvious errors within. Ed
<html>
<head>
<% ' FP_ASP -- ASP Automatically generated by a Frontpage Component. Do not Edit.
FP_CharSet = "windows-1252"
FP_CodePage = 1252 %>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>tblReportData -- Updated Record</title>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
</head>
<body bgcolor="#FFFFFF">
<!--webbot bot="PurpleText" PREVIEW="-Important- If you modify this Database Results region using the Database Results Wizard, then your Database Editor will no longer work. If you accidentally open the Database Results Wizard, simply click Cancel to exit without regenerating the Database Results region." -->
<script Language="JavaScript">
<!--
top.list.location.href = top.list.location.href;
// -->
</script>
<!--webbot bot="DatabaseRegionStart" s-columnnames s-columntypes s-dataconnection="TBIR" b-tableformat="FALSE" b-menuformat="FALSE" s-menuchoice s-menuvalue b-tableborder="TRUE" b-tableexpand="TRUE" b-tableheader="TRUE" b-listlabels="FALSE" b-listseparator="FALSE" i-ListFormat="0" b-makeform="FALSE" s-RecordSource s-displaycolumns s-criteria s-order s-sql="UPDATE tblReportData SET RptDate = #::RptDate::# , Company = '::Company::' , Symbol = '::Symbol::' , Sector = '::Sector::' , Industry = '::Industry::' , Exchange = '::Exchange::' , BValue = '::BValue::' , CPrice = ::CPrice:: , TBIRrating = '::TBIRrating::' , CCapsule = '::CCapsule::' , Comp = '::Comp::' , ShareItems = '::ShareItems::' , own = '::own::' , dands = '::dands::' , fsum = '::fsum::' , Income = '::Income::' , Hrev = '::Hrev::' , Hearn = '::Hearn::' , Headlines = '::Headlines::' , earnper = '::earnper::' , fyear = '::fyear::' , cbrok = '::cbrok::' , cbrok1 = '::cbrok1::' , cbrok2 = '::cbrok2::' , cbrok3 = '::cbrok3::' , cbrok4 = '::cbrok4::' , tbirshort = '::tbirshort::' , tbirlong = '::tbirlong::' , tbirstrat = '::tibrstrat::' , wssynop = '::wssynop::' WHERE (RptID = ::RptID::)" b-procedure="FALSE" clientside SuggestedExt="asp" s-DefaultFields="RptDate=&Company=&Symbol=&Sector=&Industry=&Exchange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=&ShareItems=&own=&dands=&fsum=&Income=&Hrev=&Hearn=&Headlines=&earnper=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=&cbrok4=&tbirshort=&tbirlong=&tibrstrat=&wssynop=&RptID=" s-NoRecordsFound="Record updated in table." i-MaxRecords="1" i-GroupSize="0" u-dblib="../../../_fpclass/fpdblib.inc" u-dbrgn1="../../../_fpclass/fpdbrgn1.inc" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" Tag="BODY" startspan BOTID="0" preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00" align="left"><font color="#000000">This is the start of a Database Results region.</font></td></tr></table>" b-WasTableFormat="FALSE" --><!--#include file="../../../_fpclass/fpdblib.inc"-->
<% 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="UPDATE tblReportData SET RptDate = #::RptDate::# , Company = '::Company::' , Symbol = '::Symbol::' , Sector = '::Sector::' , Industry = '::Industry::' , Exchange = '::Exchange::' , BValue = '::BValue::' , CPrice = ::CPrice:: , TBIRrating = '::TBIRrating::' , CCapsule = '::CCapsule::' , Comp = '::Comp::' , ShareItems = '::ShareItems::' , own = '::own::' , dands = '::dands::' , fsum = '::fsum::' , Income = '::Income::' , Hrev = '::Hrev::' , Hearn = '::Hearn::' , Headlines = '::Headlines::' , earnper = '::earnper::' , fyear = '::fyear::' , cbrok = '::cbrok::' , cbrok1 = '::cbrok1::' , cbrok2 = '::cbrok2::' , cbrok3 = '::cbrok3::' , cbrok4 = '::cbrok4::' , tbirshort = '::tbirshort::' , tbirlong = '::tbirlong::' , tbirstrat = '::tibrstrat::' , wssynop = '::wssynop::' WHERE (RptID = ::RptID::)"
fp_sDefault="RptDate=&Company=&Symbol=&Sector=&Industry=&Exchange=&BValue=&CPrice=&TBIRrating=&CCapsule=&Comp=&ShareItems=&own=&dands=&fsum=&Income=&Hrev=&Hearn=&Headlines=&earnper=&fyear=&cbrok=&cbrok1=&cbrok2=&cbrok3=&cbrok4=&tbirshort=&tbirlong=&tibrstrat=&wssynop=&RptID="
fp_sNoRecords="Record updated in table."
fp_sDataConn="TBIR"
fp_iMaxRecords=1
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=False
fp_fMenuFormat=False
fp_sMenuChoice=""
fp_sMenuValue=""
fp_iDisplayCols=16
fp_fCustomQuery=True
BOTID=0
fp_iRegion=BOTID
%>
<!--#include file="../../../_fpclass/fpdbrgn1.inc"-->
<!--webbot bot="DatabaseRegionStart" endspan i-checksum="35815" -->
<p><!--webbot bot="PurpleText" PREVIEW="This is the UPDATE query." --></p>
<!--webbot bot="DatabaseRegionEnd" b-tableformat="FALSE" b-menuformat="FALSE" u-dbrgn2="../../../_fpclass/fpdbrgn2.inc" i-groupsize="0" clientside Tag="BODY" startspan preview="<table border=0 width="100%"><tr><td bgcolor="#FFFF00" align="left"><font color="#000000">This is the end of a Database Results region.</font></td></tr></table>" --><!--#include file="../../../_fpclass/fpdbrgn2.inc"-->
<!--webbot bot="DatabaseRegionEnd" endspan i-checksum="9297" -->
<%=fp_sQuery%>
</body>
</html>
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/3/2003 15:03:53
The form on the edit.asp page is named FrontPage_Form1
|
|
|
|
Long Island Lune
Posts: 2340 Joined: 6/8/2002 From: New York Status: offline
|
RE: DRW Submission forms - 11/3/2003 15:18:15
quote:
I still see the "Record updated inTable" message Find this line in your DRW code: fp_sNoRecords="Record updated in table." Erase the message so it looks like this: fp_sNoRecords=""
_____________________________
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/3/2003 15:33:54
Within FrontPage, I am unable to get the update.asp page to save the Response.write code. I get the error message "The contents of a FrontPage Component have been modified. These contents will be overwritten when you save the page." I copied the page local, then tried to save the changes to the page from an HTML editor, and it worked, but when I placed the revised page on the site, the Response.write code had disappeared. What do I need to do differently ??? Ed
|
|
|
|
emoss2
Posts: 105 From: Long Island, NY, USA Status: offline
|
RE: DRW Submission forms - 11/3/2003 15:35:08
Why would I do this? I want to receive this message when the update is successful.
_____________________________
Ed Moss
|
|
|
|
Long Island Lune
Posts: 2340 Joined: 6/8/2002 From: New York Status: offline
|
RE: DRW Submission forms - 11/3/2003 15:43:58
My mistake. I thought you didn't want to see that message.
_____________________________
|
|
New Messages |
No New Messages |
Hot Topic w/ New Messages |
Hot Topic w/o New Messages |
Locked w/ New Messages |
Locked w/o New Messages |
|
Post New Thread
Reply to Message
Post New Poll
Submit Vote
Delete My Own Post
Delete My Own Thread
Rate Posts
|
|
|