Flexigrid - Lightweight but rich data grid

[eluser]Balaji ASP[/eluser]
[quote author="paulopmx" date="1208402076"][quote author="Balaji ASP" date="1208373956"]Nice, very nice. Thx my friend...!!

i used this query for my applications it's works good...

I’ve just noticed when I run it in ie7

server 2003:
I get an error saying Line: 402 ‘id is null or not an object’.

xp:
I get an error saying Line: 403 ‘id is null or not an object’.

here is the link
http://synergiq.co.uk/test/flexigrid/

plz help me my friend... ASAP...[/quote]

Hi Balaji,

Here is your problem at the last part of asp file that generates the JSON FILE

Code:

{id:'245', cell:['245', 'collin','sharples','green','200','sleepy','70','female','76 water terrace','15 rue des begognas','76 water terrace','45 rue de la liberte','london bridge (right under it)','Australia','Bourgogne','1']},
]}

as you can see there is a comma after "'Bourgogne','1']}" what happens is that IE is expecting another array object, but the truth is there isn't anymore. Firefox tries to fix this automatically, but IE requires you to fix it and follow proper array format.[/quote]

Thx Thx Thx my friend... for your valuable replay!! :-)

now it's working fine... in IE7,Mozilla and other browsers

here is the code i used with your suggestion

Code:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
&lt;!--#include File="INC_FILES/ADOVBS.INC"--&gt;
<%
set cnn = server.createobject("ADODB.Connection")
cnn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server;.MapPath("test")&".mdb;"

Set RecordsetXML = Server.CreateObject ("ADODB.Recordset")
    RecordsetXML.CursorType = adOpenDynamic
    RecordsetXML.CursorLocation = adUseClient
Set RecordsetXML2 = Server.CreateObject ("ADODB.Recordset")
    RecordsetXML2.CursorType = adOpenDynamic
    RecordsetXML2.CursorLocation = adUseClient    
'Page Numbers
Dim page
page = Request.Form("page")
if page = "" then
page = 1
End if

Dim rp
rp = Request.Form("rp")
if rp = "" then
rp = 15
End if

Dim start
start = ((page-1) * rp)
limit = " TOP "&page;*rp



'Search Bits
Dim searchterm
Dim sortname
if Request.Form("sortname") = "" then
sortname = "id"
Else
sortname = Request.Form("sortname")
End If

Dim sortorder
if Request.Form("sortorder") = "" then
sortorder = "desc"
Else
sortorder = Request.Form("sortorder")
End If

Dim sort

sort = " ORDER By "&sortname;&" "&sortorder;if Request.form("query") <> "" then
searchterm = Request.form("query")
searchcols = request.form("qtype")
if searchcols = "id" then
    if isnumeric(searchterm) then
    fullsearch = "WHERE "&searchcols;&" = "&searchterm;else
    fullsearch = ""
    end if
Else
    fullsearch = "WHERE "&searchcols;&" LIKE '%"&searchterm;&"%'"
End if
End if

'Main Query
Dim RecordsetXML
Dim RecordsetXML_cmd
Dim RecordsetXML_numRows

RecordsetXML_cmd = "SELECT "& limit &" * FROM person "&fullsearch;&""&sort;RecordsetXML.open RecordsetXML_cmd,cnn,3,3
RecordsetXML_numRows = 0

'Count Recordset
Dim RecordsetXML2
Dim RecordsetXML2_cmd
Dim RecordsetXML2_numRows

RecordsetXML2_cmd= "SELECT count(*) as countR FROM person"

RecordsetXML2.open RecordsetXML2_cmd,cnn,3,3
RecordsetXML2_numRows = 0

Dim total
Dim countRec
total = RecordsetXML2.Fields.Item("countR").Value

RecordsetXML2.Close()
Set RecordsetXML2 = Nothing


%>
{
page: <%=page%>,
total: <%=cstr(total)%>,
rows: [
<%
RecordsetXML.Move start

for i=start to RecordsetXML.recordcount-1
if i <> RecordsetXML.recordcount-1 then
%>
{id:'<%=(RecordsetXML.Fields.Item("id").Value)%>', cell:['<%=(RecordsetXML.Fields.Item("id").Value)%>', '<%=(RecordsetXML.Fields.Item("firstname").Value)%>','<%=(RecordsetXML.Fields.Item("lastname").Value)%>','<%=(RecordsetXML.Fields.Item("color").Value)%>','<%=(RecordsetXML.Fields.Item("height").Value)%>','<%=(RecordsetXML.Fields.Item("middlename").Value)%>','<%=(RecordsetXML.Fields.Item("age").Value)%>','<%=(RecordsetXML.Fields.Item("sex").Value)%>','<%=(RecordsetXML.Fields.Item("address1").Value)%>','<%=(RecordsetXML.Fields.Item("address2").Value)%>','<%=(RecordsetXML.Fields.Item("address3").Value)%>','<%=(RecordsetXML.Fields.Item("address4").Value)%>','<%=(RecordsetXML.Fields.Item("address5").Value)%>','<%=(RecordsetXML.Fields.Item("country").Value)%>','<%=(RecordsetXML.Fields.Item("region").Value)%>','<%=(RecordsetXML.Fields.Item("is_dead").Value)%>']},
<%else%>
{id:'<%=(RecordsetXML.Fields.Item("id").Value)%>', cell:['<%=(RecordsetXML.Fields.Item("id").Value)%>', '<%=(RecordsetXML.Fields.Item("firstname").Value)%>','<%=(RecordsetXML.Fields.Item("lastname").Value)%>','<%=(RecordsetXML.Fields.Item("color").Value)%>','<%=(RecordsetXML.Fields.Item("height").Value)%>','<%=(RecordsetXML.Fields.Item("middlename").Value)%>','<%=(RecordsetXML.Fields.Item("age").Value)%>','<%=(RecordsetXML.Fields.Item("sex").Value)%>','<%=(RecordsetXML.Fields.Item("address1").Value)%>','<%=(RecordsetXML.Fields.Item("address2").Value)%>','<%=(RecordsetXML.Fields.Item("address3").Value)%>','<%=(RecordsetXML.Fields.Item("address4").Value)%>','<%=(RecordsetXML.Fields.Item("address5").Value)%>','<%=(RecordsetXML.Fields.Item("country").Value)%>','<%=(RecordsetXML.Fields.Item("region").Value)%>','<%=(RecordsetXML.Fields.Item("is_dead").Value)%>']}
<%
end if
RecordsetXML.movenext
next
%>
]}

<%
RecordsetXML.Close()
Set RecordsetXML = Nothing
%>

Thx once again my friend... :-)