- 在线时间
- 0 小时
- 最后登录
- 2010-9-2
- 注册时间
- 2004-12-23
- 听众数
- 2
- 收听数
- 0
- 能力
- 0 分
- 体力
- 66 点
- 威望
- 0 点
- 阅读权限
- 20
- 积分
- 36
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 33
- 主题
- 1
- 精华
- 0
- 分享
- 0
- 好友
- 0
升级   32.63% 该用户从未签到
 |
< >★Asp.net如何连接SQL Server2000数据库
# g# t7 P p+ w% E; p5 ] ; s+ N9 n( y- j3 E, |
大家好,以下是有关ASP.net连接SQL Server2000数据库的例程, " O _1 O% h* B& ^( }, j* j
在这里和大家分享一下:
. c* L8 d% V) H4 s. J2 l
' }2 o5 m8 A# K1 B3 i Asp.net连接SQL Server2000数据库例程详解:
: j8 {6 ?5 i; r <%@ Import Namespace="System.Data" %>
. }" B! N+ ^- n- D+ w <%@ Import NameSpace="System.Data.SqlClient" %> * d2 J( e( D9 b$ C0 L
<script laguage="VB" runat="server"> . p! W4 u; a( v ] N! ]
sub page_load(sender as Object,e as EventArgs) , Y3 Y: |# j! C. u: z2 M# u3 A
Dim myConnection As SqlConnection
4 ~$ {9 u) R2 _$ f$ D Dim myCommand As SqlCommand
7 \) U, Z3 _5 f- T! V# e2 ~ Dim ds as DataSet
: j" Y8 R- h% o; r- P& v3 a '1.connect to sql server . `) b. @% F# l: M6 h6 W& n
myConnection = New SqlConnection( "server=localhost;database=Pubs;uid=ueytjdf;pwd=doekdf" )
/ H6 n( ^/ F7 E, k7 g, r2 p7 e( _4 m myConnection.Open() / H" g: D+ ?3 k$ L' g# d1 h
la1.text="Connection Opened!"
9 B! r5 L1 [: {: X" A/ i- A$ Z+ l % J, S+ g2 D$ b" d
'2.Create a table 3 H0 ] E6 r& y6 z; k" b
myCommand = New SqlCommand( "CREATE TABLE [test] ([id] [int] IDENTITY (1, 1) NOT NULL ,[name] , u8 {7 e' ?- _3 s1 c+ x
+ D. k8 H7 ~3 C" h# Y
[char] (10) COLLATE Chinese_PRC_CI_AS NULL ,[sex] [char] (10) COLLATE Chinese_PRC_CI_AS NULL
- M& h8 r. \6 _9 A r6 { 1 y6 b0 }0 [, w. v6 n& x1 E2 }
)", myConnection )
& t/ m9 L! |5 C' {0 M. [ myCommand.ExecuteNonQuery() % q1 m) g0 D' P3 o( a R
la2.text="New table created!" 8 Q- H7 I% x) |- ^# K2 d
0 j- ]5 F& h- r '2 添加纪录 ' l3 D; i3 |& M, G0 Y
myCommand = New SqlCommand( "Insert into [test] (name,sex) values( '黄志文','男' )",
1 S! |) S [+ ?# C z7 e
$ L3 m0 `4 P: p+ w8 X0 c; n myConnection )
0 D% O) V! y/ Z! Q myCommand.ExecuteNonQuery() $ v3 }; p9 i/ p) J3 t
la3.text="New Record Inserted!"
+ r6 P9 _) K0 t7 s* L6 W I 3 T) V1 W) w) \5 z
'3 更新数据 $ w* M" P3 D* h1 ~+ L
myCommand = New SqlCommand( "UPDATE [test] SET name='Smith' where name='李明'", myConnection ) 1 E: h+ E7 H# Q
myCommand.ExecuteNonQuery() / C2 k+ J9 |& Z' ^; q3 C1 o
la4.text="Record Updated!" 5 y( e# I- U Y/ L3 ?
8 a8 V2 }5 r1 J, X- d- z; f '4 删除数据
3 n6 w. t5 ~1 c% Z7 |- C! U myCommand = New SqlCommand( "delete from [test] where name='Smith'", myConnection ) " x# C# d9 i: e+ J) Y/ K
myCommand.ExecuteNonQuery() / }( X2 R; p, R/ Q) `* P6 H% `
la5.text="Record Deleted!" 6 o$ g* `% B: c
* ]0 H# U- e; v( B0 p9 @4 D
'5 用DataGrid显示数据
& F. {: s7 D F' \; |! D myCommand = New SqlCommand( "select * from [test]", myConnection ) , h/ X8 G8 b. ]3 d
MyDataGrid.DataSource=myCommand.ExecuteReader() 9 a; T' s! c( o7 I
MyDataGrid.DataBind() ' }# C% U3 m+ ^; a3 J8 l0 j2 B
end sub / G, S' m, R C- G0 u
</script>
: l( R2 I4 N$ E9 F <html>
( E: I( F0 l3 s: K <body>
0 J7 W& Z/ N% D- ? <asp:label id="la1" runat="server" /><br>
0 M: c( D+ t" p <asp:label id="la2" runat="server" /><br> + c- e$ Y# A' @' v& E m6 w9 \
<asp:label id="la3" runat="server" /><br> ! S) G [8 r+ T5 y4 R' v) h1 V. r
<asp:label id="la4" runat="server" /><br>
9 b' C! ~ }# A3 C% K) k <asp:label id="la5" runat="server" /><br>
" J$ q% @! F5 F! m% P) t2 [ <ASP ataGrid id="MyDataGrid" runat="server"
* X2 G3 W) f W( K+ I BorderColor="black"
. P- \; h9 ]1 l. D$ V Z+ S: p0 } BorderWidth="1" % @4 V+ h1 p" e- B$ ~& a
GridLines="Both"
- t, d4 t9 i& @9 f) H$ T CellPadding="3"
$ n+ ]* ~; I* ^6 k CellSpacing="0" ; y: q1 y8 }* [& {* z/ ]" I, c
Font-Name="Verdana"
( X* x% c) x, u( g' |& c Font-Size="10pt"
; Y6 y9 a( c! l HeaderStyle-BackColor="#aaaadd"
: Z9 c$ ?* I4 w, K/ t AlternatingItemStyle-BackColor="#eeeeee"
3 {" M# H7 c. i( D5 ]. d >
( E" }2 Z9 R4 ^+ ~0 _4 n% V; o </asp ataGrid>
" X1 U( n; {! y2 M- I( w+ f- }. I3 A
9 j6 f m+ [& L: ]' W& I! M, U( C </body> / {1 ? N/ G/ z6 V
</html> h- W) f+ r* P5 ~& e
-------------------------------------------------------------------------
5 {. b: z1 k9 r R" j6 t 推荐空间:
2 W: J* X; [4 X1 {. d( s' q1 ^
8 S' c- [$ h- z8 N( {. u: a. | ◆商务型C 送CN域名 1600元/年
7 ?$ W7 z% @( @3 i( d! j# f6 u) a 独立500网站空间 ,同时支持 ASP, ASP.NET;
' O8 b* G {, k0 d5 |/ g 提供SQLSERVER2000的数据库存,支持ACCESS数据库 ) u1 y- X3 Z2 S8 n4 }$ n
送800MB邮箱邮箱
$ x3 s* q- q, I: }
" D2 ]1 J+ l$ \; k+ O ◆虚拟专用C型机 送CN域名 4000元/年
" N0 G5 i' e0 L! E5 s4 M4 B5 A r$ Q 3000M的网站空间,同时支持 ASP, ASP.NET
- w4 @% Y; G0 \# t" w' z 支持SQLSERVER2000/access数据库,数据库空间不限
% z3 c" n5 ]: u6 b; a! z 送2000M VIP 企业邮局
! S/ ]6 W+ F2 A* c ------------------------------------------------------------------------ % M; ]7 A: e* D
同时有本月特大的优惠:
. T1 I: o2 e" x# L, X/ z6 f ! X3 t5 c9 E( l; C7 S
◆增强C型主机 送CN域名 送300M 邮局 698 元/年 7 f# v2 L* r$ q; c4 R
◆基本C型主机 送.CN或.COM域名 送100Mb邮局 348 元/年 - K8 s" N4 s1 Q) E9 W5 [( K2 G
******************************************************************** / z4 n9 ?$ @! O4 s+ Z1 M8 [; r
★购买或者续费时代互联的产品,产品7折大优惠!
6 ]' g. ?2 D1 h1 V( {9 j 详情请见:http://now.net.cn/special/index_chris.net' o% L2 e. x6 Q5 U0 _: O* V6 y
★.CN+地区.CN 仅需180元!
3 F h6 o$ Z1 Q1 B G .Cn+VDNS无限+.COM+地区.CN 仅需228元!6 L4 }* c# x# V
更多优惠,详情请见:http://now.net.cn/special/</P>
8 F- v9 b X9 E) G! _& m< > 全球免费咨询电话,请点击 <a href="http://todayisp.com/customer/moreline.net" target="_blank" >http://todayisp.com/customer/moreline.net</A>
6 ]' C! t8 u4 `( y6 y/ X Q Q:188092185 342186899% i) l- r) B7 N3 E* X( ~% B
TEL:0756-2281071 </P> |
zan
|