home *** CD-ROM | disk | FTP | other *** search
- <HTML>
- <HEAD>
- <META HTTP-EQUIV="Pragma" CONTENT="no-cache">
- <META HTTP-EQUIV="Expires" CONTENT="-1">
- </HEAD>
- <BODY bgcolor=#ffffff>
- <BR>
- <%
- cache = getParameter($params, "dbcache");
- sql = getParameter($params, "sql");
- %>
- <CENTER>
- <TABLE border=0 cellspacing=4>
- <TR><TD><FONT SIZE=+1 COLOR=#000080>DBMS Cache</FONT> </TD>
- <TD> <%=cache; %></TD></TR>
- <TR><TD><FONT SIZE=+1 COLOR=#000080>SQL</FONT> </TD>
- <TD> <%=sql; %></TD></TR>
- </TABLE>
- <BR>
- <TABLE border=0 cellspacing=0>
- <TR><TD>
- <%
- dbm = dbcache(cache);
- dbprepare(dbm, sql, NULL);
- dbexecute(dbm);
- printf("<pre>\n");
- while ((a = dbfetch(dbm)) != NULL)
- {
- for (i = 0; i < sizeof(a); i++)
- printf(" %s ", (char *)a[i]);
-
- printf("\n");
- }
- printf("</pre>\n");
- dbclose(dbm);
- %>
- </TD></TR>
- </TABLE>
- <BR>
- </CENTER>
- </BODY>
- </HTML>
-