商品房合同备案要多久:请教一个软件方面的问题?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/27 17:18:20
<%@ Import Namespace="System.Data" %>
<%@ Import NameSpace="System.Data.SqlClient" %>
<script laguage="VB" runat="server">
sub page_load(sender as Object,e as EventArgs)
Dim myConnection As SqlConnection
Dim myCommand As SqlCommand
Dim ds as DataSet

myConnection = New SqlConnection( "server=localhost;database=std;uid=sa;pwd=123456" )
myConnection.Open()

myCommand = New SqlCommand( "CREATE TABLE [test] ([id] [int] IDENTITY (1, 1) NOT NULL ,[name] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,[sex] [char] (10) COLLATE Chinese_PRC_CI_AS NULL )", myConnection )
myCommand.ExecuteNonQuery()

sub tianjia_click(sender as Object,e as EventArgs)
myCommand=New SqlCommand("Insert into [test] (name,sex) values( 'tb1','tb2' )",myConnection)
myCommand.ExecuteNonQuery()
end sub

myCommand = New SqlCommand( "select * from [text]", myConnection )
MyDataGrid.DataSource=myCommand.ExecuteReader()
MyDataGrid.DataBind()
end sub
</script>
<html>
<body>
<form runat="server">
<p>
<asp:textbox ID="tb1" runat="server" />
<br>
<asp:textbox id="tb2" runat="server" />
</p>
<asp:Button id="bt" text="提交" onclick="tianjia_click" runat="server"/>
</form>
<ASP:DataGrid id="MyDataGrid" runat="server"
BorderColor="black"
BorderWidth="1"
GridLines="Both"
CellPadding="3"
CellSpacing="0"
Font-Name="Verdana"
Font-Size="10pt"
HeaderStyle-BackColor="#aaaadd"
AlternatingItemStyle-BackColor="#eeeeee"
>
</asp:DataGrid>

</body>
</html>
请问这段代码为什么插入没有用?请帮我改一下?