连数据库部分代码是
<%@ Page Language="VB" Debug="true" %>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Data.OleDb" %><script language="VB" runat="Server">
Sub Page_Load(sender As Object, e As EventArgs)
  dim objConnection as OleDbConnection
  dim objCommand as OleDbCommand
  dim objDataReader as OleDbDataReader
  objConnection=new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source="+Server.MapPath("/text1/55.mdb"))
  objConnection.Open()
  objCommand=new OleDbCommand("select * from text" , objConnection) 
  objDataReader=objCommand.ExecuteReader()
  if objDataReader.Read() then 
    oicq.Text=Convert.ToString(objDataReader.item("aa"))
    homesite.Text=Convert.ToString(objDataReader.item("bb"))
  end if
  objDataReader.Close() 
  objConnection.Close()         
End Sub
</script>
我页面显示代码为
<table width="50%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
  <form runat="server">
    <td height="52"><asp:Label id="oicq"  runat="server"/></td>
    <td><asp:Label id="homesite"  runat="server"/></td>
</form>
  </tr>
</table>大家帮忙啊,小第只有20分啦~!大家别嫌少呀~先谢谢啊~~~~~~~~~~!