Asp.netÁ¬½ÓÊý¾Ý¿â½Ì³Ì£¨vb.net£©

Asp.netÁ¬½ÓSQL Server2000Êý¾Ý¿âÀý³ÌÏê½â: 
<%@ 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 
'1.connect to sql server 
myConnection = New SqlConnection( "server=localhost;database=Pubs;uid=ueytjdf;pwd=doekdf" ) 
myConnection.Open() 
la1.text="Connection Opened!" 
'2.Create a table 
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() 
la2.text="New table created!" 
'2 Ìí¼Ó¼Í¼ 
myCommand = New SqlCommand( "Insert into [test] (name,sex) values( '»ÆÖ¾ÎÄ','ÄÐ' )", myConnection ) 
myCommand.ExecuteNonQuery() 
la3.text="New Record Inserted!" 
'3 ¸üÐÂÊý¾Ý 
myCommand = New SqlCommand( "UPDATE [test] SET name='Smith' where name='ÀîÃ÷'", myConnection ) 
myCommand.ExecuteNonQuery() 
la4.text="Record Updated!" 
'4 É¾³ýÊý¾Ý 
myCommand = New SqlCommand( "delete from [test] where name='Smith'", myConnection ) 
myCommand.ExecuteNonQuery() 
la5.text="Record Deleted!" 
'5 ÓÃDataGridÏÔʾÊý¾Ý 
myComma