Hi All,
Using Win2k SP4, no .NET stuff just plain ASP using JScript as
serverside scripting language.
Early in my .asp file I have this bit of code :
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include file="../Connections/cnn_intra.asp" -->
<!--#include file="../connections/cnn_intra_shaped.asp" -->
-- cut some irrelevant code from here --
<%
var rst_shapeset = Server.CreateObject("ADODB.Recordset");
rst_shapeset.ActiveConnection = MM_cnn_intra_shaped_STRING;
rst_shapeset.Source = "SHAPE {SELECT * FROM dbo.tbl_pm_revisiondetails
WHERE
dbo.tbl_pm_revisiondetails.Par = " +
rst_shapeset__var_projectid.replace(/'/g, "''") + " ORDER BY
dbo.tbl_pm_revisiondetails.revID DESC} APPEND ({SELECT * FROM
dbo.tbl_pm_expenses} RELATE revID TO Par) AS expenses";
rst_shapeset.CursorType = 0;
rst_shapeset.CursorLocation = 2;
rst_shapeset.LockType = 1;
rst_shapeset.Open();
var rst_shapeset_numRows = 0;
%>
-- cut some more irrelevant code from here --
<%
var rst_expensesShapeChild = rst_shapeset("expenses").Value;
%>
-- cut yet more irrelevant code from here --
<%
var expensesTotal = 0;
if (!rst_expensesShapeChild.EOF || !rst_expensesShapeChild.BOF) {
rst_expensesShapeChild.MoveFirst();
while (!rst_expensesShapeChild.EOF) {
expensesSubTotal = rst_expensesShapeChild +
rst_expensesShapeChild.Fields.Item("ExpenseValue") .Value;
rst_expensesShapeChild.MoveNext;
}
}
%>
All the above happens *before* the <HTML> tag. Somewhere within the
<BODY> I have this:
<td><div align="right"><%=expensesSubTotal%></div></td>
Obviously the variable expensesSubTotal is populated by the While loop
in the last bit of ASP/Javascript code above. But I'm getting the
error:
Error Type:
Response object, ASP 0185 (0x8002000E)
A default property was not found for the object.
/ictest/pmdb/pmdb_sub_commercial.asp, line 463
It doesnt seem to matter whether I just use <%=expensesSubTotal%> or
<%Response.Write(expensesSubTotal)%> I always get the same error.
Microsoft appear to know nothing whatsoever of this error, a search of
the entire microsoft.com site yields absolutely nothing.
If anyone can help me I'd be very grateful! If anyone from Microsoft
is reading this, please document the error messages, how are we
supposed to fix bugs when we can't even find out what's wrong?
