<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rs Dim rs_numRows Set rs = Server.CreateObject("ADODB.Recordset") rs.ActiveConnection = MM_dbConn_STRING rs.Source = "SELECT * FROM category order by orderSort" rs.CursorType = 0 rs.CursorLocation = 2 rs.LockType = 1 rs.Open() rs_numRows = 0 %> Flyttekassen.net
Virksomheden
Om os
Nyheder

Handelsbetingelser

 

Kontakt/info

 



Produkt grupper

<% Dim catId Dim catName While (NOT rs.EOF) catId =(rs.Fields.Item("id").Value) catName =(rs.Fields.Item("category").Value) %>
<%=catName%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rs.MoveNext() Wend %>

 

 

 

Søg efter vare:




| Roskildevej 328 | DK-2630 Taastrup | send mail | Tlf.: +45 43 71 40 17 | Fax.: +45 43 71 20 17
<% rs.Close() Set rs = Nothing %>