selected Japanese information

<%@LANGUAGE="VBSCRIPT"%> <% category=Request.Querystring("c_id") set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_kworld_STRING if category="All" then Recordset1.Source = "SELECT * FROM j_info" else Recordset1.Source = "SELECT * FROM j_info WHERE c_category='" & category & "'" end if Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 3 Recordset1.Open() Recordset1_numRows = 0 %> selected Japanese information

KnitJapan.co.uk

selected information

<% do while NOT Recordset1.EOF category=(Recordset1.Fields.Item("c_category").Value) select case(category) case ("Textile Galleries") T_G=T_G + 1 if T_G=1 then %> <% end if %> <% case("Textile Schools") K_S=K_S + 1 if K_S=1 then %> <% end if %> <% case ("Knitting Magazines") K_M=K_M + 1 if K_M=1 then %> <% end if %> <% case ("Knitting Supplies") K_S=K_S + 1 if K_S=1 then %> <% end if %> <% case ("Knitting Machinery") K_Ma=K_Ma + 1 if K_Ma=1 then %> <% end if %> <% case ("Trade Organisations") T_O=T_O + 1 if T_O=1 then %> <% end if %> <% case ("Yarn Companies") Y_C=Y_C + 1 if Y_C=1 then %> <% end if %> <% case ("Japanese Techniques") J_T=J_T + 1 if J_T=1 then %> <% end if %> <% case ("Textile Makers") T_M=T_M + 1 if T_M=1 then %> <% end if %> <% case ("Fibre Artists") F_A=F_A + 1 if F_A=1 then %> <% end if %> <% case ("Traditional textiles") T_T=T_T + 1 if T_T=1 then %> <% end if %> <% end select Recordset1.moveNext loop %>

items listed under this category:
	Textile Galleries	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Textile Schools	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Knitting Magazines	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Knitting Supplies	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Knitting Machinery	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Trade Organisations	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Yarn Companies	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Japanese Techniques	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Textile Makers	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Fibre Artists	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>
	Traditional Textiles	Summary
?c_id=<%=(Recordset1.Fields.Item("info_id").Value)%>"><%=(Recordset1.Fields.Item("j_company").Value)%>		<%=(Recordset1.Fields.Item("c_summary").Value)%>

<% Recordset1.Close() %>