留言版系统留言版系统留言版系统

If Page > 1 Then Response.Write "<a href='Default.asp?Page=1' title='首页'><font face=webdings>" & 9 & "</font></a>" Response.Write "&nbsp;<a href='Default.asp?Page="&Page-1&"' title='上一页'><font face=webdings>" & 7 & "</font></a>" End If If Rs.PageCount <= 4 Then For j = 1 To Rs.PageCount Response.Write "&nbsp;<a href='Default.asp?Page="&j&"'>" & j & "</a>" Next Else For j = 1 To 4 Response.Write "&nbsp;<a href='Default.asp?Page="&j&"'>" & j & "</a>" Next If Page < Rs.PageCount Then Response.Write "&nbsp;<a href='Default.asp?Page="&Page+1&"' title='下一页'><font face=webdings>" & "8" & "</a></font>" End If Response.Write "&nbsp;<a href='Default.asp?Page="&Rs.PageCount&"' title='尾页'><font face=webdings>:</font></a>" End If

从零开始动态网页制作

动态网页制作的基础教程，从零开始动态网页制作一书的课件，设计内容的源代码

gass-s解方程组

g-s迭代法解方程组 数值分析function x=gaussseidel(A,b,p,detal)