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…
Hi Balaji,
Here is your problem at the last part of asp file that generates the JSON FILE
{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.
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
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include File="INC_FILES/ADOVBS.INC"-->
<%
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… 😊