Article ID: 193226
Article Last Modified on 3/16/2005
<SCRIPT ID=serverEventHandlersVBS LANGUAGE=vbscript RUNAT=Server>
Sub Button1_onclick()
call ChangeRS
End Sub
Sub Grid_onenter()
If thisPage.firstEntered then
Recordset1.open
End if
End Sub
Sub ChangeRS()
If Recordset1.isOpen() then Recordset1.close()
'Change to a New SQL Statement
Recordset1.setSQLText( "Select * from Employees")
Recordset1.open
Grid1.bindAllColumns
End Sub
</SCRIPT>
Keywords: kbhowto kbctrl KB193226