Fine Art Source International<title> <link rel="StyleSheet" href="coolstyle.css" type="text/css"> <script language="JavaScript" type="text/javascript" src="javascripts.js"></script> <script language="JavaScript" type="text/javascript" src="pop-closeup.js"></script> </head><body bgcolor="#ffffff">   <table cellpadding="0" cellspacing="0" border="0" width="100%" height="100%"><tr><td valign="top" class="header-s"> <br>  <table cellpadding="0" cellspacing="0" border="0" width="100%"><tr><td valign="top" rowspan="2"> <br> </td><td align="right" valign="top" height="60"> <div id="pictures"> <table cellpadding="0" cellspacing="0" border="0" width="210"><tr><td valign="top" align="center"> <script language="JavaScript" type="text/javascript" src="contact.js"></script> </td></tr></table> </div>  <script language="JavaScript" type="text/javascript" src="header.js"></script> </td></tr><tr><td align="right" valign="top"> <script language="JavaScript" type="text/javascript" src="menu.js"></script> <br><br> </td></tr></table>  </td></tr><tr><td valign="top" align="center">  <table cellpadding="0" cellspacing="10" border="0" width="100%"> <tr><td align="left" valign="top" width="20"> <script language="JavaScript" type="text/javascript" src="pageheight.js"></script> </td><td align="center" valign="top"> <br><br><br> <a name="top"></a> <br /><br /><br />  <%Dim SQL, RS, strRETURNED_DATA, EOF_VAL, intNUM_COL, intNUM_ROW, intROW_COUNTER, ID, TITLE, I, TOP_I, _ strCATE, CATE I = 0 CATE = Trim(Request.QueryString("CATE")) IF IS_VALID_ID(CATE) = False THEN CATE = 0 SQL = "SELECT fldNAME, ID FROM faq_tbl_cate ORDER BY fldNAME ASC" Call OPEN_DB() Set RS = Server.CreateObject("ADODB.Recordset") RS.LockType = 1 RS.CursorType = 0 RS.Open SQL, MyConn WHILE NOT RS.EOF IF CATE = trim(RS("ID")) Then strCATE = strCATE & "<option selected value=" & chr(34) & trim(RS("ID")) & chr(34) & ">" & trim(RS("fldNAME")) & vbcrlf ELSE strCATE = strCATE & "<option value=" & chr(34) & trim(RS("ID")) & chr(34) & ">" & trim(RS("fldNAME")) & vbcrlf END IF RS.MoveNext WEND RS.Close %> <form action="faq/index.asp" method="get"> <table width="500" align="center" cellpadding="2" cellspacing="0" border="0"><tr><td align="right"> <table cellpadding="2" cellspacing="0" border="0"><tr> <td><select name="cate"><option value="0" selected>Show All Terms<%= strCATE %> </select></td> <td><input type="Image" src="faq/img/btn_go.gif" width="40" height="21" alt="" border="0" /></td> </tr></table> </td></tr></table> </form> <p align="left"><br /> </p> <table width="553" align="left"> <tr> <td width="195"> </td> <td width="282"> </td> <td width="42"> </td> </tr> <tr> <td> </td> <td> <% IF CATE = "" OR CATE = "0" THEN SQL = "SELECT ID, fldTITLE FROM faq_tbl_faq WHERE (fldENABLE=1) ORDER BY fldORD" ELSE SQL = "SELECT ID, fldTITLE FROM faq_tbl_faq WHERE (fldENABLE=1) AND (fldCATE_ID = " & CATE & ") ORDER BY fldORD" END IF Set RS = Server.CreateObject("ADODB.Recordset") RS.CursorType = 3 RS.Open SQL, MyConn 'RS = MyConn.Execute(SQL) IF NOT RS.EOF THEN strRETURNED_DATA = RS.getrows ELSE EOF_VAL = True END IF RS.close IF Not EOF_VAL = True Then intNUM_COL=ubound(strRETURNED_DATA,1) intNUM_ROW=ubound(strRETURNED_DATA,2) FOR intROW_COUNTER = 0 TO intNUM_ROW ID = strRETURNED_DATA(0,intROW_COUNTER) TITLE = strRETURNED_DATA(1,intROW_COUNTER) I = I + 1 TOP_I = TOP_I + 1 %> <li /> <a href="faq/index.asp?CATE=<%= CATE %>#<%=I%>"><%=TITLE%></a> <% NEXT END IF %> <br /></td> <td> </td> </tr> <tr> <td> </td> <td> </td> <td> </td> </tr> </table> <table width="500" align="left" cellpadding="2" cellspacing="0" border="0"> <tr> <td> <br /> <% I = 0 IF CATE = "" OR CATE = "0" THEN SQL = "SELECT ID, fldTITLE, fldSOLUTION, fldQUESTION FROM faq_tbl_faq WHERE fldENABLE=1 ORDER BY fldORD" ELSE SQL = "SELECT ID, fldTITLE, fldSOLUTION, fldQUESTION FROM faq_tbl_faq WHERE fldENABLE=1 AND fldCATE_ID = " & CATE & " ORDER BY fldORD" END IF Set RS = MyConn.Execute(SQL) IF NOT RS.EOF THEN strRETURNED_DATA = RS.getrows ELSE EOF_VAL = True END IF RS.close Set RS = Nothing MyConn.close Set MyConn = Nothing IF Not EOF_VAL = True Then intNUM_COL=ubound(strRETURNED_DATA,1) intNUM_ROW=ubound(strRETURNED_DATA,2) FOR intROW_COUNTER = 0 TO intNUM_ROW ID = strRETURNED_DATA(0,intROW_COUNTER) TITLE = strRETURNED_DATA(1,intROW_COUNTER) SOLUTION = strRETURNED_DATA(2,intROW_COUNTER) QUESTION = strRETURNED_DATA(3,intROW_COUNTER) I = I + 1 %> <b><a name="<%=I%>"><%=TITLE%></a> </b><br /> <%= Replace(QUESTION,vbcrlf,"<br />") %><br /><br /> <br /><div align="right"><%If NOT I = 1 THEN%><a href="faq/index.asp?CATE=<%=CATE%>#<%=I-1%>"><img src="faq/img/arrow_l.gif" width="10" height="11" alt="Previous" border="0"></a><%Else%><img src="faq/img/pixel.gif" width="10" height="11" alt="" border="0"><% End If %> <a href="faq/index.asp?CATE=<%=CATE%>#top"><img src="faq/img/arrow.gif" width="11" height="10" alt="Top" border="0"></a> <%If NOT TOP_I = I THEN%><a href="faq/index.asp?CATE=<%=CATE%>#<%=I+1%>"><img src="faq/img/arrow_r.gif" width="10" height="11" alt="Next" border="0"></a><%Else%><img src="faq/img/pixel.gif" width="10" height="11" alt="" border="0"><% End If %></div><br /><hr style="height: 1px;" color="#808080" /><br /><br /> <% NEXT END IF %> </td> </tr></table>   </body></html>  <table cellpadding="0" cellspacing="6" border="0" width="100%" class="footertext"><tr><td align="center" valign="bottom"> <script language="JavaScript" type="text/javascript" src="copyright.js"></script> </td><td align="right" valign="bottom"> </td></tr></table>