<% SET CON=SERVER.CREATEOBJECT("ADODB.CONNECTION") CON.OPEN "ncustat" %> <% SQL= "SELECT * FROM 教師" set RSQ = CON.EXECUTE(SQL)%> <%DO WHILE NOT RSQ.EOF%> <% RSQ.MOVENEXT LOOP%>

Email	姓名	學歷	專長	研究室	分機
style="text-decoration:none">	.htm style="text-decoration:none" target=_blank><%=RSQ("姓名")%>	<%IF RSQ("學歷")<>"" THEN%> style="text-decoration:none" target=_blank><%=RSQ("學歷")%><%ELSE%>　<%END If%>	<%IF RSQ("專長")<>"" THEN%><%=RSQ("專長")%><%ELSE%>　<%END If%>	<%IF RSQ("研究室")<>"" THEN%><%=RSQ("研究室")%><%ELSE%>　<%END If%>	<%IF RSQ("分機")<>"" THEN%><%=RSQ("分機")%><%ELSE%>　<%END IF%>