Link Exchange DP-draftingservices.com
Dp Drafting Services
 A Division of Design Presentation Associates
We Offer
Auto CAD
Drafting services
  • Order Now
  • Get a Quote
CAD Drafting Services Power Sector ServicesDrafting Services CAD Services CAD Service
  • Upload your Request
    Proposal Form
Home ›› Links

Links

<% dim QueryForDomain,ResultForDomain dim domain_name domain_name="dds" set ResultForDomain=server.createobject("adodb.recordset") 'set Resultforservice=server.createobject("adodb.recordset") call OpenConnection QueryForDomain="select * from tbl_category order by category" set ResultForDomain=NewConnection.Execute(QueryForDomain) %>

<% while not ResultForDomain.EOF or ResultForDomain.BOF QueryForservice="select count(0) from tbl_category_info where Cat_Id='" & ResultForDomain(0) & "' and DomainName='" & domain_name & "' and confrm='1'" set ResultForservice=NewConnection.Execute(QueryForService) %> <% ResultForservice.close ResultForDomain.movenext If ResultForDomain.EOF then else QueryForservice="select count(0) from tbl_category_info where Cat_Id='" & ResultForDomain(0) & "' and DomainName='" & domain_name & "' and confrm='1'" set ResultForservice=NewConnection.Execute(QueryForService) %> <% ResultForservice.close ResultForDomain.movenext End if wend call closeconnection %>
<%=ResultForDomain("category")%>   [<%=ResultForservice(0)%>]<%=ResultForDomain("category")%>   [<%=ResultForservice(0)%>]

Link Exchange - DP-Draftingservices.com



3D Rendering
Payment Options