sub del(sender as object, e as datagridcommandeventargs)
dim con as oledbconnection
dim constr as string
constr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("db2.mdb")
con=new oledbconnection(constr)
con.open()
Dim strDele As String = "DELETE FROM guestbook"
Dim myCommand As OleDbCommand = New OleDbCommand ( strDele , Con)
myCommand.ExecuteNonQuery ()
con.close()
end sub
</script>
<body>
<form runat="server">
<asp:Datagrid id="dg" runat="server"
allowpaging="true"
pagesize=6
onpageindexchanged="dg_pc"
showheader="true"
headerstule-backcolor="lightblue"
headerstyle-forecolor="blue"
bodercolor="black"
cellpadding=2
cellspacing=2
itemstyle-backcolor="lightgreen"
horizontalalign="center"
pagerstyle-horizontalalign="center"
pagerstyle-mode="numericpages"
autogeneratecolumns="false"
ondeletecommand="del">
<columns>
<asp:boundcolumn datafield="h" headertext="浏览留言内容"/>
<asp:buttoncolumn HeaderText="删除" ButtonType="PushButton" Text="删除" CommandName="del"/>
</columns>
这是我的代码，请问有什么错吗？为什么删不了？
