metals_torm o kadar uğraşmış ellerine sağlık. Benimde çorbada tuzum bulunsun dedim. metals_torm'un koduna küçük bir ekleme yaptım.

......... } //END Prototype assignment//-->
</script>
<%
set dizi=server.CreateObject("Adodb.Recordset")
sql="select * from diziler where id="&id
dizi.open sql,conn,1,3
 if Not dizi.eof then
%>
<ul id="countrytabs" class="shadetabs">
<% for i = 1 to 10 
  if dizi("kod"& i) <> "" Then %>
<li><a href="#" rel="country<% =i %>" class="selected">part <% =i %></a></li>
<%
  end if
  next %>
</ul>
<div style="border:1px solid gray; width:632px; margin-bottom: 1em; padding: 10px">
<% for i = 1 to 10 
  if dizi("kod"& i) <> "" Then %>
<div id="country<% =i %>" class="tabcontent">
<%=dizi("kod"& i)%>
</div>
<% 
  end if
 next %>
</div>
<% else 
 Response.Write"Kayıt bulunamadı"
 end if
dizi.close
Set dizi = nothing %>
.......
<script type="text/javascript">
var countries=new ddtabcontent("countrytabs")