请见如下代码:
在AccessDataSource中定义了GridView控件显示数据源的数据库,
如果想用page_load函数中定义的变量 EquipmentName 取代 [申请设备]='行车1' 中的'行车1'的话该如何写?
如果这样写:
[申请设备]='" & EquipmentName & "'
则运行错误:分析器错误信息: 服务器标记的格式不正确。如果这样写:
[申请设备]='<% Response.Write(EquipmentName)%>'
则页面可以启动,但是没有任何显示(空白页面)===========代码开始==========================
<%@ import Namespace="system.data" %>
<%@ import Namespace="system.data.oledb" %><script language="vb" runat="server">         
    Sub page_load(ByVal sender As Object, ByVal e As EventArgs)                       
        Dim EquipmentName As String = "行车1"        
    End Sub
</script><html >
<head id="Head1" runat="server">
    <title>排队记录</title>
    <meta http-equiv ="refresh" content="60">
    <base target="_self">
</head>
<body bgcolor="#EEF2FE" topmargin="0">  
    <form id="form1" runat="server"> 
    <div style="font-size: small; text-align: center;">
        <br />
        <asp:Label ID="HeadLine" runat="server" Width="492px" Font-Size="15pt" ForeColor="#006699"></asp:Label> </div>
        
<div style="text-align: center">
        <asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" BackColor="#EEF2FE"
            BorderColor="#CCCCCC" BorderStyle="Inset" BorderWidth="1px" CellPadding="4" DataSourceID="AccessDataSource1" Font-Size="10pt" PageSize="100" Width="97%" ForeColor="White">
            <FooterStyle BackColor="White" ForeColor="#000066" />
            <Columns>     
                <asp:BoundField DataField="申请者" HeaderText="申请者" SortExpression="申请者" />
               <asp:BoundField DataField="申请设备" HeaderText="申请设备" SortExpression="申请设备" />
                <asp:BoundField DataField="操作状态" HeaderText="操作状态" SortExpression="操作状态" />
                <asp:BoundField DataField="申请时间" HeaderText="申请时间" SortExpression="申请时间" />                             
            </Columns>
            <RowStyle ForeColor="#000066" BorderColor="White" />
            <SelectedRowStyle BackColor="#669999" Font-Bold="True" ForeColor="White" />
            <PagerStyle BackColor="White" ForeColor="#000066" HorizontalAlign="Left" />
            <HeaderStyle BackColor="#006699" Font-Bold="True" ForeColor="White" />
        </asp:GridView>
        <asp:AccessDataSource ID="AccessDataSource1" runat="server" DataFile="~/data/queue.mdb"
            SelectCommand="SELECT [申请者], [申请设备], [操作状态],[申请时间] FROM [queue] where [操作状态]<>'使用结束' and [申请设备]='行车1'">
        </asp:AccessDataSource>          
     <br />
        <asp:Label ID="MessageOutput" runat="server" Width="616px" Font-Size="10pt" ForeColor="#006699"></asp:Label>
     <br />
<br />
<br />
   </div>
   </form>
</body>
</html>
===========代码结束==========================
以上代码正常显示情况如图: