شهيد همت

<%@LANGUAGE="VBSCRIPT" %> شهيد همت <% set mytoc = server.CreateObject("mswc.nextlink") %> <% a = request.QueryString("index")%> <% b = mytoc.getlistcount("smallpics.txt")%> <% back = request.QueryString("index")-1 forward = request.QueryString("index")+1 %> <% If back = 0 Then %> خانه &index=<%=forward%>">بعدی <% ElseIf forward = b+1 Then %> &index=<%=back%>">قبلی خانه <% Else %> &index=<%=back%>">قبلی خانه &index=<%=forward%>">بعدی <% End If %>

" alt="شهِيد همت">