-
Full Screen Update
I am including my asp code. The Full Screen Update is not working for me. I am using ASPdb Pro. Thanks for any help.
<%
dim cnn, rs, F1, i, Top, Bottom
set cnn = Server.CreateObject( "ADODB.Connection"
cnn.Open = "gui"
set rs = Server.CreateObject( "ADODB.Recordset"
rs.Open "tasks", cnn,, 3
Top=Clng(session("SV_RecordPointer_5511")
Bottom=Recptr + clng(session("SV_GridInc_5511")
for i = Top to bottom
F1=Request.Form("CompletedC" & rs("TaskID")
rs.MoveNext
next
rs.Close
cnn.Close
%>
<form method="POST" action="tasks-FullScreenEdit.asp">
<%
Set X=Server.CreateObject ("ASP.DB"
X.dbUserLocalText = zHead & ",<Center><h3>NOC Tasks</h3></Center>;"
X.dbUnit=5511
X.dbImageDir = "/images/aspdb/"
X.dbMode = "Grid"
X.dbGridCol = "2"
X.dbDSN = "gui"
X.dbSQL = "Select * from Tasks Where Completed = No Order by Frequency"
X.dbGridTableTag = "border=1"
X.dbButtonsOnOff = "EditDropOff"
'X.dbGridDisplayFlds = "TaskID,Task,Frequency,Completed"
X.dbEditParams = "TableName=Tasks, BookMarkFlds=TaskID"
X.dbEditFlds = "Task,Description,Frequency,Completed"
X.dbEditUpdateROFlds = "Task,Frequency,Description"
X.dbEditDropFlds = "Frequency,,,/Daily/Weekly/Monthly"
X.dbColor = "White,Black,White,Black,LightBlue"
X.dbGridInc = 50
X.dbGridIncMax = 50
X.dbMemoTextSize = -1
X.dbFilterFlds = "Task,Frequency,Completed"
X.dbFilterParams = "Help=False"
X.dbMagicCell = "(;,[]#|~/+{})Completed,,<INPUT NAME='CompletedC#0#' VALUE='#4#'>"
X.dbCountSQL = "SELECT COUNT(1) FROM Tasks"
X.dbNavigationIcon = "Std"
X.dbNavigation = "Bottom"
X.dbNavigationItem = "top,prev,next,bottom,update,Add,Reload,GridCo l"
X.dbButtonAnchor = False
X.dbExportFlds = "Description,TaskID"
X.ASPdb
%>
<Center><input type="submit" value="Update"></center>
</form></Center>
-
Full Screen Update (reply)
No, it won't for now but when the features are rolled down (check web site product matrix) it will. I'll check.
------------
Dan Hendricks at 8/15/01 4:59:17 PM
I am including my asp code. The Full Screen Update is not working for me. I am using ASPdb Pro. Thanks for any help.
<%
dim cnn, rs, F1, i, Top, Bottom
set cnn = Server.CreateObject( "ADODB.Connection"
cnn.Open = "gui"
set rs = Server.CreateObject( "ADODB.Recordset"
rs.Open "tasks", cnn,, 3
Top=Clng(session("SV_RecordPointer_5511")
Bottom=Recptr + clng(session("SV_GridInc_5511")
for i = Top to bottom
F1=Request.Form("CompletedC" & rs("TaskID")
rs.MoveNext
next
rs.Close
cnn.Close
%>
<form method="POST" action="tasks-FullScreenEdit.asp">
<%
Set X=Server.CreateObject ("ASP.DB"
X.dbUserLocalText = zHead & ",<Center><h3>NOC Tasks</h3></Center>;"
X.dbUnit=5511
X.dbImageDir = "/images/aspdb/"
X.dbMode = "Grid"
X.dbGridCol = "2"
X.dbDSN = "gui"
X.dbSQL = "Select * from Tasks Where Completed = No Order by Frequency"
X.dbGridTableTag = "border=1"
X.dbButtonsOnOff = "EditDropOff"
'X.dbGridDisplayFlds = "TaskID,Task,Frequency,Completed"
X.dbEditParams = "TableName=Tasks, BookMarkFlds=TaskID"
X.dbEditFlds = "Task,Description,Frequency,Completed"
X.dbEditUpdateROFlds = "Task,Frequency,Description"
X.dbEditDropFlds = "Frequency,,,/Daily/Weekly/Monthly"
X.dbColor = "White,Black,White,Black,LightBlue"
X.dbGridInc = 50
X.dbGridIncMax = 50
X.dbMemoTextSize = -1
X.dbFilterFlds = "Task,Frequency,Completed"
X.dbFilterParams = "Help=False"
X.dbMagicCell = "(;,[]#|~/+{})Completed,,<INPUT NAME='CompletedC#0#' VALUE='#4#'>"
X.dbCountSQL = "SELECT COUNT(1) FROM Tasks"
X.dbNavigationIcon = "Std"
X.dbNavigation = "Bottom"
X.dbNavigationItem = "top,prev,next,bottom,update,Add,Reload,GridCo l"
X.dbButtonAnchor = False
X.dbExportFlds = "Description,TaskID"
X.ASPdb
%>
<Center><input type="submit" value="Update"></center>
</form></Center>
-
Full Screen Update (reply)
You can do full screen editing. there is a good working example of how to do thia at www.mmstools.com ... example 127
I hope that helps!
Donna
------------
Frank Kwong at 8/15/01 11:17:50 PM
No, it won't for now but when the features are rolled down (check web site product matrix) it will. I'll check.
------------
Dan Hendricks at 8/15/01 4:59:17 PM
I am including my asp code. The Full Screen Update is not working for me. I am using ASPdb Pro. Thanks for any help.
<%
dim cnn, rs, F1, i, Top, Bottom
set cnn = Server.CreateObject( "ADODB.Connection"
cnn.Open = "gui"
set rs = Server.CreateObject( "ADODB.Recordset"
rs.Open "tasks", cnn,, 3
Top=Clng(session("SV_RecordPointer_5511")
Bottom=Recptr + clng(session("SV_GridInc_5511")
for i = Top to bottom
F1=Request.Form("CompletedC" & rs("TaskID")
rs.MoveNext
next
rs.Close
cnn.Close
%>
<form method="POST" action="tasks-FullScreenEdit.asp">
<%
Set X=Server.CreateObject ("ASP.DB"
X.dbUserLocalText = zHead & ",<Center><h3>NOC Tasks</h3></Center>;"
X.dbUnit=5511
X.dbImageDir = "/images/aspdb/"
X.dbMode = "Grid"
X.dbGridCol = "2"
X.dbDSN = "gui"
X.dbSQL = "Select * from Tasks Where Completed = No Order by Frequency"
X.dbGridTableTag = "border=1"
X.dbButtonsOnOff = "EditDropOff"
'X.dbGridDisplayFlds = "TaskID,Task,Frequency,Completed"
X.dbEditParams = "TableName=Tasks, BookMarkFlds=TaskID"
X.dbEditFlds = "Task,Description,Frequency,Completed"
X.dbEditUpdateROFlds = "Task,Frequency,Description"
X.dbEditDropFlds = "Frequency,,,/Daily/Weekly/Monthly"
X.dbColor = "White,Black,White,Black,LightBlue"
X.dbGridInc = 50
X.dbGridIncMax = 50
X.dbMemoTextSize = -1
X.dbFilterFlds = "Task,Frequency,Completed"
X.dbFilterParams = "Help=False"
X.dbMagicCell = "(;,[]#|~/+{})Completed,,<INPUT NAME='CompletedC#0#' VALUE='#4#'>"
X.dbCountSQL = "SELECT COUNT(1) FROM Tasks"
X.dbNavigationIcon = "Std"
X.dbNavigation = "Bottom"
X.dbNavigationItem = "top,prev,next,bottom,update,Add,Reload,GridCo l"
X.dbButtonAnchor = False
X.dbExportFlds = "Description,TaskID"
X.ASPdb
%>
<Center><input type="submit" value="Update"></center>
</form></Center>
-
Full Screen Update (reply)
Very good, that'll work too...
------------
Donna at 8/16/01 10:33:53 AM
You can do full screen editing. there is a good working example of how to do thia at www.mmstools.com ... example 127
I hope that helps!
Donna
------------
Frank Kwong at 8/15/01 11:17:50 PM
No, it won't for now but when the features are rolled down (check web site product matrix) it will. I'll check.
------------
Dan Hendricks at 8/15/01 4:59:17 PM
I am including my asp code. The Full Screen Update is not working for me. I am using ASPdb Pro. Thanks for any help.
<%
dim cnn, rs, F1, i, Top, Bottom
set cnn = Server.CreateObject( "ADODB.Connection"
cnn.Open = "gui"
set rs = Server.CreateObject( "ADODB.Recordset"
rs.Open "tasks", cnn,, 3
Top=Clng(session("SV_RecordPointer_5511")
Bottom=Recptr + clng(session("SV_GridInc_5511")
for i = Top to bottom
F1=Request.Form("CompletedC" & rs("TaskID")
rs.MoveNext
next
rs.Close
cnn.Close
%>
<form method="POST" action="tasks-FullScreenEdit.asp">
<%
Set X=Server.CreateObject ("ASP.DB"
X.dbUserLocalText = zHead & ",<Center><h3>NOC Tasks</h3></Center>;"
X.dbUnit=5511
X.dbImageDir = "/images/aspdb/"
X.dbMode = "Grid"
X.dbGridCol = "2"
X.dbDSN = "gui"
X.dbSQL = "Select * from Tasks Where Completed = No Order by Frequency"
X.dbGridTableTag = "border=1"
X.dbButtonsOnOff = "EditDropOff"
'X.dbGridDisplayFlds = "TaskID,Task,Frequency,Completed"
X.dbEditParams = "TableName=Tasks, BookMarkFlds=TaskID"
X.dbEditFlds = "Task,Description,Frequency,Completed"
X.dbEditUpdateROFlds = "Task,Frequency,Description"
X.dbEditDropFlds = "Frequency,,,/Daily/Weekly/Monthly"
X.dbColor = "White,Black,White,Black,LightBlue"
X.dbGridInc = 50
X.dbGridIncMax = 50
X.dbMemoTextSize = -1
X.dbFilterFlds = "Task,Frequency,Completed"
X.dbFilterParams = "Help=False"
X.dbMagicCell = "(;,[]#|~/+{})Completed,,<INPUT NAME='CompletedC#0#' VALUE='#4#'>"
X.dbCountSQL = "SELECT COUNT(1) FROM Tasks"
X.dbNavigationIcon = "Std"
X.dbNavigation = "Bottom"
X.dbNavigationItem = "top,prev,next,bottom,update,Add,Reload,GridCo l"
X.dbButtonAnchor = False
X.dbExportFlds = "Description,TaskID"
X.ASPdb
%>
<Center><input type="submit" value="Update"></center>
</form></Center>
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
|
|