<%@ Register TagPrefix="Title" TagName="TitleShow" Src="/aspnetdata/Title.ascx" %>
<html>
<head>
	<script language="VB" runat="server">
	Sub Page_load(sender As Object, e As EventArgs) 
	dim i as integer,k1 as string,k as integer
	For i=0 to Page.Controls.Count-1
		k1=k1 & ";" & Page.Controls(i).UniqueID
		k=k+1
	Next
	k1=Right(k1,Len(k1)-1)
	label1.text="所有控件名称：" & k1 & "<br>" & "所有控件数量：" & Convert.ToString(k)
	end sub
	</script>
</head>
<body background="/aspnetdata/images/winback.gif">
<Title:TitleShow id="BookT" Runat="server" />
<form id="nform" runat="server">
<p><asp:hyperlink id=AccessLink1 NavigateUrl="http://access.winwalk.com.tw/faq/4.htm" runat="server">更改类型时，显示字段数过多之信息，应如何处理?</asp:hyperlink>
<p><asp:hyperlink id=VBALink1 NavigateUrl="http://access.winwalk.com.tw/faq/protect.htm" runat="server">如何在Office各软件保护VBA程序代码，不允许用户查看程序</asp:hyperlink>
<p><asp:hyperlink id=VBALink2 NavigateUrl="http://access.winwalk.com.tw/faq/vba4.htm" runat="server">如何在VBA程序代码寻找错误?</asp:hyperlink>
<p><asp:Label id=Label1 align="left" runat="server" />
    </form>

</body>
</html>