请问这样的错误该怎么改啊?---->>>>贴一下你的代码
解决方案 »
- 指定的参数已超出有效值的范围。index
- 正则表达式
- Eval("xxx")与if 判断 ?????
- 如果我想用类似Aplication_onStart(...) Aplication_End()之类的方法在vs2005里面那里找?
- 写cookie 问题,不能在Page_Load外写入.
- 实在是没分了!!问一个关于datagrid分页问题,不是自动分页
- 再次请教/如何在用C#添加站点的同时为此站点添加"主机头"
- 【PetShop 1.5】 中利用 OPEN XML 查询的同时更新主表和多条明细记录的范例存储过程
- 模板列中放了一个超级链接,想统计每个链接的点击次数,如何做?
- 怎么在服务器模型中的事件处理中关掉浏览器窗口
- 急!!请高手帮忙!!熟悉Visual Studio .NET 2003工具
- 请教使用owc编写动态线型图的详细代码(c#)
在ASP.NET WEB MATRIX下运行没有问题,但发布到网站就有问题!
代码如下
GUEST.ASPX
<%@ Page Language="vb" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server"> Sub Page_Load(Source As Object, E As EventArgs)
Dim myConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0 ;Data Source=" & server.mappath("data.mdb"))
Dim myAdapter As New OleDbDataAdapter
Dim myOleDbCommandBuilder As OleDbCommandBuilder = New OleDbCommandBuilder(myAdapter)
Dim DS As DataSet = New DataSet
myAdapter.SelectCommand = new OleDbCommand("select ID, 标题, 署名 from Guest order by id desc", myconn)
myconn.open()
myAdapter.Fill(ds, "Guest")
ml.DataSource=ds.Tables("Guest").DefaultView
ml.DataBind()
end sub</script>
<html>
<head>
<title>留言本</title> <style>BODY {
FONT-SIZE: 9pt
}
P {
FONT-SIZE: 9pt
}
TD {
FONT-SIZE: 9pt
}
</style>
</head>
<body>
<p align="center">
<font size="6">留言本</font>
</p>
<ASP:DataGrid id="ml" Font-Names="宋体" runat="server" Width="100%" BorderColor="Black" CellPadding="3" Font-Name="宋体" Font-Size="9pt" HeaderStyle-BackColor="#ddaacc" EnableViewState="False">
<HeaderStyle backcolor="#DDAACC"></HeaderStyle>
<Columns>
<asp:HyperLinkColumn Text="查看内容" Target="_new" DataNavigateUrlField="id" DataNavigateUrlFormatString="see.asp?id={0}"></asp:HyperLinkColumn>
</Columns>
</ASP:DataGrid>
<br />
<br />
<font size="3">我要留言</font> ==><br />
<form action="send.aspx" method="post">
标题:<input type="text" name="title" />
<br />
署名:<input type="text" name="name" />
<br />
内容:<textarea name="body"></textarea>
<br />
<input type="submit" value="提交查询内容" />
</form>
</body>
</html>
SEND.ASPX
Sub Page_Load(Source As Object, E As EventArgs)
Dim myConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0 ;Data Source=" & server.mappath("data.mdb"))
Dim myInsertQuery As String = "insert into guest (标题, 署名, 内容) values ('" & request("title") & "', '" & request("name") & "', '" & request("body") & "')"
Dim myOleDbCommand As New OleDbCommand(myInsertQuery)
myOleDbCommand.Connection = myConn
myConn.Open()
myOleDbCommand.ExecuteNonQuery()
myOleDbCommand.Connection.Close()
response.redirect("guest.aspx",true)
end sub
把SEND和GUEST合并
Page_Load(...)
{
if (!IsPostBack)
{
//你原来的代码
}
else
{
string strSql="insert into guest(..) values('"+title.Text+"','"+name.Text+"','"+content.Text+"')";
//执行数据库插入操作
}
}另外,把Form等HTML控件加上runat="server",并把name改为ID