home *** CD-ROM | disk | FTP | other *** search
/ 221.214.14.186 / 221.214.14.186.tar / 221.214.14.186 / common / price.asp < prev    next >
Text File  |  2010-11-01  |  1KB  |  34 lines
  1.    
  2.     <%sub query2table(inputquery)
  3.  
  4.       set conn=server.createobject("ADODB.connection")
  5.           conn.open("Provider=SQLOLEDB.1;Server=80.0.0.127;Database=sdxnw1;UID=sdxnwread;pwd=DSread17@8408;")
  6.       set rstemp=conn.execute(inputquery)
  7.           howmanyfields=rstemp.fields.count -1
  8.      %>
  9.                         íííí 
  10.      <table border=0>
  11.      <%do while not rstemp.eof%>
  12.       <tr> 
  13.        <% for i = 0 to howmanyfields
  14.            thisvalue=rstemp(i)
  15.            If isnull(thisvalue) then
  16.            thisvalue=""
  17.            end if
  18.         %>
  19.        <td valign=top><%=thisvalue%></td>
  20.         <%next%> 
  21.                           </tr>
  22.                           <%rstemp.movenext
  23.                             loop
  24.                           %>
  25.                          <%response.flush%> 
  26.                         </table>
  27.                         <%
  28.                           rstemp.close
  29.                           set rstemp=nothing
  30.                           conn.close
  31.                           set conn=nothing
  32.                           end sub
  33.                         %>
  34.