<%@LANGUAGE="VBSCRIPT"%> <% id_spec = request.QueryString("ids") id_placowki = request.QueryString("idp") czcionkaw="13px" %> Zarządzanie pytaniami
Baza pytań:
  Skrócone pytanie   Liczba odpowiedzi      
<% set objsp = server.CreateObject("adodb.recordset") objsp.open "select * from v_pytania_do_spec where (id_specjalizacji_chor="&id_spec&" or id_specjalizacji="&id_spec&") and status=1 order by ile_odpowiedzi", conn,1,3 while not objsp.eof %> <% objsp.movenext wend objsp.close %>
  <% if len(objsp("tresc"))>80 then opis_dlugi=Left(objsp("tresc"),80)+"..." else opis_dlugi=objsp("tresc") end if %> <%=opis_dlugi%>   <%=objsp("ile_odpowiedzi")%>   &idp=<%=id_placowki%>&ids=<%=id_spec%>">pokaż i odpowiedz