Model
Part No.
Description
Rate
Quantity
<% dim n n=0 set conn=Server.CreateObject("ADODB.connection") 'set rs=Server.CreateObject("ADODB.recordset") conn.Open "dsn=ups;uid=;pwd=" set rs=conn.Execute("select * from konparts") rs.movefirst while not rs.eof n=n+1 %>
<% Response.Write(rs("model")) %>
<% Response.Write(rs("partno")) %>
<% Response.Write(rs("description")) %>
<% Response.Write(rs("rate")) %>
<% Response.Write(rs("quantity")) %>
<% rs.movenext wend conn.Close %>
! U.P.S. Minilab Service Pvt. Ltd. ! Copyright © All rights reserved !
designed & developed by :
Best Webonline Services Pvt. Ltd.
