|
<i><b>Originally posted by : salil ghosh (ghoshsalil@hotmail.com)</b></i><br />Thanks a lot. As wanted by Mr. David Highlander I am sending the code for the Page:<br /><%@ Language=VBScript %><br /><% ' VI 6.0 Scripting Object Model Enabled %><br /><!--#include file="_ScriptLibrary/pm.asp"--><br /><% if StartPageProcessing() Then Response.End() %><br /><FORM name=thisForm METHOD=post><br /><HTML><br /><HEAD><br /><META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"><br /></HEAD><br /><BODY><br /><br /><P><br /><!--METADATA TYPE="DesignerControl" startspan<br /><OBJECT classid="clsid:9CF5D7C2-EC10-11D0-9862-0000F8027CA0" id=Recordset1><PARAM NAME="ExtentX" VALUE="12197"><PARAM NAME="ExtentY" VALUE="2090"><PARAM NAME="State" VALUE="(TCConn=qConnection1q,TCDBObject=qTablesq,TCDBObje ctName=qins_masterq,TCControlID_Unmatched=qRecords et1q,TCPPConn=qConnection1q,RCDBObject=qRCDBObject q,TCPPDBObject=qTablesq,TCPPDBObjectName=qins_mast erq,TCCursorType=q3s-sStaticq,TCCursorLocation=q3s-sUsesclient-sidescursorsq,TCLockType=q3s-sOptimisticq,TCCacheSize_Unmatched=q10q,TCCommTime out_Unmatched=q10q,CCPrepared=0,CCAllRecords=1,TCN Records_Unmatched=q10q,TCODBCSyntax_Unmatched=qq,T CHTargetPlatform=qq,TCHTargetBrowser_Unmatched=qSe rvers(ASP)q,TCTargetPlatform=qInheritsfromspageq,R CCache=qRCBookPageq,CCOpen=1,GCParameters=(Rows=0) )"></OBJECT><br />--><br /><!--#INCLUDE FILE="_ScriptLibrary/Recordset.ASP"--><br /><SCRIPT LANGUAGE="JavaScript" RUNAT="server"><br />function _initRecordset1()<br />{<br /> var DBConn = Server.CreateObject('ADODB.Connection');<br /> DBConn.ConnectionTimeout = Application('Connection1_ConnectionTimeout');<br /> DBConn.CommandTimeout = Application('Connection1_CommandTimeout');<br /> DBConn.CursorLocation = Application('Connection1_CursorLocation');<br /> DBConn.Open(Application('Connection1_ConnectionStr ing'), Application('Connection1_RuntimeUserName'), Application('Connection1_RuntimePassword'));<br /> var cmdTmp = Server.CreateObject('ADODB.Command');<br /> var rsTmp = Server.CreateObject('ADODB.Recordset');<br /> cmdTmp.ActiveConnection = DBConn;<br /> rsTmp.Source = cmdTmp;<br /> cmdTmp.CommandType = 2;<br /> cmdTmp.CommandTimeout = 10;<br /> cmdTmp.CommandText = '`ins_master`';<br /> rsTmp.CacheSize = 10;<br /> rsTmp.CursorType = 3;<br /> rsTmp.CursorLocation = 3;<br /> rsTmp.LockType = 3;<br /> Recordset1.setRecordSource(rsTmp);<br /> Recordset1.open();<br /> if (thisPage.getState('pb_Recordset1') != null)<br /> Recordset1.setBookmark(thisPage.getState('pb_Recor dset1'));<br />}<br />function _Recordset1_ctor()<br />{<br /> CreateRecordset('Recordset1', _initRecordset1, null);<br />}<br />function _Recordset1_dtor()<br />{<br /> Recordset1._preserveState();<br /> thisPage.setState('pb_Recordset1', Recordset1.getBookmark());<br />}<br /></SCRIPT><br /><br /><!--METADATA TYPE="DesignerControl" endspan--><br /></P><br /><P><FONT face=Arial size=5><EM>This is test.</EM></FONT></P><br /><P><br /><!--METADATA TYPE="DesignerControl" startspan<br /><OBJECT classid="clsid:277FC3F2-E90F-11D0-B767-0000F81E081D" id=Grid2 <br />style="HEIGHT: 147px; WIDTH: 516px"><PARAM NAME="_ExtentX" VALUE="13653"><PARAM NAME="_ExtentY" VALUE="3889"><PARAM NAME="DataConnection" VALUE=""><PARAM NAME="SourceType" VALUE=""><PARAM NAME="Recordset" VALUE="Recordset1"><PARAM NAME="CtrlName" VALUE="Grid2"><PARAM NAME="UseAdvancedOnly" VALUE="0"><PARAM NAME="AdvAddToStyles" VALUE="-1"><PARAM NAME="AdvTableTag" VALUE=""><PARAM NAME="AdvHeaderRowTag" VALUE=""><PARAM NAME="AdvHeaderCellTag" VALUE=""><PARAM NAME="AdvDetailRowTag" VALUE=""><PARAM NAME="AdvDetailCellTag" VALUE=""><PARAM NAME="ScriptLanguage" VALUE="1"><PARAM NAME="ScriptingPlatform" VALUE="0"><PARAM NAME="EnableRowNav" VALUE="0"><PARAM NAME="HiliteColor" VALUE=""><PARAM NAME="RecNavBarHasNextButton" VALUE="-1"><PARAM NAME="RecNavBarHasPrevButton" VALUE="-1"><PARAM NAME="RecNavBarNextText" VALUE=" > "><PARAM NAME="RecNavBarPrevText" VALUE=" < "><PARAM NAME="ColumnsNames" VALUE='"ins_code","ins_name1","ins_addl1","ins_pinc","ins_phon"'><PARAM NAME="columnIndex" VALUE="0,1,2,3,4"><PARAM NAME="displayWidth" VALUE="68,127,136,95,68"><PARAM NAME="Coltype" VALUE="1,1,1,1,1"><PARAM NAME="formated" VALUE="0,0,0,0,0"><PARAM NAME="DisplayName" VALUE='"","","","",""'><PARAM NAME="DetailAlignment" VALUE=",,,,"><PARAM NAME="HeaderAlignment" VALUE=",,,,"><PARAM NAME="DetailBackColor" VALUE=",,,,"><PARAM NAME="HeaderBackColor" VALUE=",,,,"><PARAM NAME="HeaderFont" VALUE=",,,,"><PARAM NAME="HeaderFontColor" VALUE=",,,,"><PARAM NAME="HeaderFontSize" VALUE=",,,,"><PARAM NAME="HeaderFontStyle" VALUE=",,,,"><PARAM NAME="DetailFont" VALUE=",,,,"><PARAM NAME="DetailFontColor" VALUE=",,,,"><PARAM NAME="DetailFontSize" VALUE=",,,,"><PARAM NAME="DetailFontStyle" VALUE=",,,,"><PARAM NAME="ColumnCount" VALUE="5"><PARAM NAME="CurStyle" VALUE="Basic Navy"><PARAM NAME="TitleFont" VALUE="Shymal01"><PARAM NAME="titleFontSize" VALUE="3"><PARAM NAME="TitleFontColor" VALUE="16777215"><PARAM NAME="TitleBackColor" VALUE="13416"><PARAM NAME="TitleFontStyle" VALUE="1"><PARAM NAME="TitleAlignment" VALUE="0"><PARAM NAME="RowFont" VALUE="Shymal01"><PARAM NAME="RowFontColor" VALUE="8087790"><PARAM NAME="RowFontStyle" VALUE="0"><PARAM NAME="RowFontSize" VALUE="2"><PARAM NAME="RowBackColor" VALUE="16777215"><PARAM NAME="RowAlignment" VALUE="0"><PARAM NAME="HighlightColor3D" VALUE="268435455"><PARAM NAME="ShadowColor3D" VALUE="268435455"><PARAM NAME="PageSize" VALUE="4"><PARAM NAME="MoveFirstCaption" VALUE=" |< "><PARAM NAME="MoveLastCaption" VALUE=" >| "><PARAM NAME="MovePrevCaption" VALUE=" << "><PARAM NAME="MoveNextCaption" VALUE=" >> "><PARAM NAME="BorderSize" VALUE="1"><PARAM NAME="BorderColor" VALUE="13421772"><PARAM NAME="GridBackColor" VALUE="8421504"><PARAM NAME="AltRowBckgnd" VALUE="12632256"><PARAM NAME="CellSpacing" VALUE="0"><PARAM NAME="WidthSelectionMode" VALUE="1"><PARAM NAME="GridWidth" VALUE="516"><PARAM NAME="EnablePaging" VALUE="-1"><PARAM NAME="ShowStatus" VALUE="-1"><PARAM NAME="StyleValue" VALUE="453613"><PARAM NAME="LocalPath" VALUE=""></OBJECT><br />--><br /><!--#INCLUDE FILE="_ScriptLibrary/Button.ASP"--><br /><!--#INCLUDE FILE="_ScriptLibrary/RSNavBar.ASP"--><br /><!--#INCLUDE FILE="_ScriptLibrary/DataGrid.ASP"--><br /><SCRIPT LANGUAGE=JavaScript RUNAT=Server><br />function _initGrid2()<br />{<br />Grid2.pageSize = 4;<br />Grid2.setDataSource(Recordset1);<br />Grid2.tableAttributes = ' cellpadding=2 cellspacing=0 bordercolor=#cccccc bgcolor=Gray border=1 cols=5 rules=ALL WIDTH=516';<br />Grid2.headerAttributes = ' bgcolor=#003468 align=Left';<br />Grid2.headerWidth[0] = ' WIDTH=68';<br />Grid2.headerWidth[1] = ' WIDTH=127';<br />Grid2.headerWidth[2] = ' WIDTH=136';<br />Grid2.headerWidth[3] = ' WIDTH=95';<br />Grid2.headerWidth[4] = ' WIDTH=68';<br />Grid2.headerFormat = '<Font face="Shymal01" size=3 color=White> <b>';<br />Grid2.colHeader[0] = '''';<br />Grid2.colHeader[1] = '''';<br />Grid2.colHeader[2] = '''';<br />Grid2.colHeader[3] = '''';<br />Grid2.colHeader[4] = '''';<br />Grid2.rowAttributes[0] = ' bgcolor = White align=Left bordercolor=#cccccc';<br />Grid2.rowAttributes[1] = ' bgcolor = Silver align=Left bordercolor=#cccccc';<br />Grid2.rowFormat[0] = ' <Font face="Shymal01" size=2 color=MediumSlateBlue >';<br />Grid2.colAttributes[0] = ' WIDTH=68';<br />Grid2.colFormat[0] = '<Font Size=2 Face="Shymal01" Color=MediumSlateBlue >';<br />Grid2.colData[0] = 'Recordset1.fields.getValue('ins_code')';<br />Grid2.colAttributes[1] = ' WIDTH=127';<br />Grid2.colFormat[1] = '<Font Size=2 Face="Shymal01" Color=MediumSlateBlue >';<br />Grid2.colData[1] = 'Recordset1.fields.getValue('ins_name1')';<br />Grid2.colAttributes[2] = ' WIDTH=136';<br />Grid2.colFormat[2] = '<Font Size=2 Face="Shymal01" Color=MediumSlateBlue >';<br />Grid2.colData[2] = 'Recordset1.fields.getValue('ins_addl1')';<br />Grid2.colAttributes[3] = ' WIDTH=95';<br />Grid2.colFormat[3] = '<Font Size=2 Face="Shymal01" Color=MediumSlateBlue >';<br />Grid2.colData[3] = 'Recordset1.fields.getValue('ins_pinc')';<br />Grid2.colAttributes[4] = ' WIDTH=68';<br />Grid2.colFormat[4] = '<Font Size=2 Face="Shymal01" Color=MediumSlateBlue >';<br />Grid2.colData[4] = 'Recordset1.fields.getValue('ins_phon')';<br />Grid2.navbarAlignment = 'Right';<br />var objPageNavbar = Grid2.showPageNavbar(170,1);<br />objPageNavbar.getButton(0).value = ' |< ';<br />objPageNavbar.getButton(1).value = ' << ';<br />objPageNavbar.getButton(2).value = ' >> ';<br />objPageNavbar.getButton(3).value = ' >| ';<br />Grid2.hasPageNumber = true;<br />}<br />function _Grid2_ctor()<br />{<br /> CreateDataGrid('Grid2',_initGrid2);<br />}<br /></SCRIPT><br /><br /><% Grid2.display %><br /><br /><br /><!--METADATA TYPE="DesignerControl" endspan--><br /></P><br /><br /></BODY><br /><% ' VI 6.0 Scripting Object Model Enabled %><br /><% EndPageProcessing() %><br /></FORM><br /></HTML><br /><br /><br />Hope to get a reply soon.<br />------------<br />David Highlander at 5/4/2000 4:52:12 PM<br /><br />Please post all your code. <br /><br /><br />------------<br />salil ghosh at 5/4/2000 4:33:44 AM<br /><br />While I am trying to access the database (connected thru ODBC), it displays<br />the message as:<br />ADODB.Connection error '800a0bb9'<br /><br />The application is using arguments that are of the wrong type, are out of<br />acceptable range, or are in conflict with one another.<br /><br />/sosproj/Result.asp, line 28<br />My Website is http://www.msplindia.com/sosproj/Result.asp<br /><br />It is using Font of Regional Languages.<br />Thanks in advance. Anybody knowing the solution can come forward to help<br />out.<br />Salil.<br /><br /><br />
|