-
can't display edit button with X.dbRecordset ?
It looks like it's not possible to display the add, edit, update, delete buttons when passing an ADO recordset to Aspdb. Is there a work-around ? Is it that I open the recordset in the wrong way ?
The page works OK, except that the button does not appear. When I use X.dbMdb instead, it works fine.
The code is as follows:
<html><body>
<%@ Language=VBScript%>
<% Dim conn, rs, x
Set conn = server.createObject("adodb.connection"
conn.Provider = "Microsoft.Jet.OLEDB.4.0"
conn.Properties("Data Source".Value = "d:BizBuildSamplesOrder Entry (tour).mdb"
conn.Open
Set rs = server.createobject ("adodb.recordset"
strRs = "select ezDeleted, orderNum, num, quantity, productcode, productDescription, unitprice, amount, ezCreationDate from orderLine"
rs.Open strRS, conn, 1, 2 'keyset, adlockpessimistic
Set X=Server.CreateObject("AspDB.Pro"
X.dbRecordSet = rs 'can't have add, update, edit and delete button ??
X.dbUnit = 101
X.dbMode = "Dual"
X.dbImageDir="../images/"
X.dbNavigationItem="top, bottom, next, prev, gridrow, color, filter, download, add, update, edit, delete"
X.dbNavigationIcon="std"
X.dbEditParams="TableName=orderLine,BookMarkFl ds=ezCreationDate"
X.dbEditFlds="1,3,4"
X.ASPdbpro
rs.Close: Set rs = Nothing
conn.Close: Set conn = Nothing
%>
</body>
</html>
Thanks in advance.
Pierre C.
-
can't display edit button with X.dbRecordset ? (reply)
OK I found it. I need to specify the cursorlocation= adUseClient.
------------
Pierre Carbonnelle at 9/15/00 12:13:12 PM
It looks like it's not possible to display the add, edit, update, delete buttons when passing an ADO recordset to Aspdb. Is there a work-around ? Is it that I open the recordset in the wrong way ?
The page works OK, except that the button does not appear. When I use X.dbMdb instead, it works fine.
The code is as follows:
<html><body>
<%@ Language=VBScript%>
<% Dim conn, rs, x
Set conn = server.createObject("adodb.connection"
conn.Provider = "Microsoft.Jet.OLEDB.4.0"
conn.Properties("Data Source".Value = "d:BizBuildSamplesOrder Entry (tour).mdb"
conn.Open
Set rs = server.createobject ("adodb.recordset"
strRs = "select ezDeleted, orderNum, num, quantity, productcode, productDescription, unitprice, amount, ezCreationDate from orderLine"
rs.Open strRS, conn, 1, 2 'keyset, adlockpessimistic
Set X=Server.CreateObject("AspDB.Pro"
X.dbRecordSet = rs 'can't have add, update, edit and delete button ??
X.dbUnit = 101
X.dbMode = "Dual"
X.dbImageDir="../images/"
X.dbNavigationItem="top, bottom, next, prev, gridrow, color, filter, download, add, update, edit, delete"
X.dbNavigationIcon="std"
X.dbEditParams="TableName=orderLine,BookMarkFl ds=ezCreationDate"
X.dbEditFlds="1,3,4"
X.ASPdbpro
rs.Close: Set rs = Nothing
conn.Close: Set conn = Nothing
%>
</body>
</html>
Thanks in advance.
Pierre C.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
|