Private page.aspx  As String 
什么意思?

解决方案 »

  1.   

    可能我搞错了,我是猜测的,不过我不知道 Script_Name是什么啊?
    ---------------------------------------------------------
    <script runat = "server" >
      Const Record_Per_Page   As Short = 5 '定义每一页显示的记录数
      Private Script_Name As String Sub Page_Load ( Source As Object , e As EventArgs )
      Script_Name = GetPageName ( )
      '第二种方式来分页显示数据
      ShowRecords ( )
      End Sub
      
      '得到起始浏览超链接字符串
      Function GetPageName ( ) As String
      Dim Str As String
      Dim Pos As Short
      Str = Request.ServerVariables ( "Script_Name" ).Trim ( )
      Pos = Str.LastIndexOf ( "/" )
      If Pos >= 0 Then
      Return Str.SubString ( Pos + 1 )
      Else
      Return Str
      End If
      End Function