发表于 2009-1-5 19:48
| 
ADO.NET 鏁版嵁搴撳疄渚嬫暀绋
鍙戝竷: 2008-6-29 23:19 | 浣滆: admin | 鏌ョ湅: 58娆
>
ADO.NET鏁版嵁搴撶紪绋嬫瘮杈冨鏉傦紝鍚嶇洰绻佸鐨勭被銆佸璞°佸睘鎬с佹柟娉曡姣忎竴涓紪绋嬭呴兘鎰熻鎭肩伀銆傛湰鏂囨棬鍦ㄤ粙缁岮SP.NET Beta2鏁版嵁搴撶紪绋嬬殑涓昏鍐呭锛屽府鍔╃紪绋嬭呮渶蹇殑浜嗚ВADO.NET鏁版嵁搴撶紪绋嬬殑绮鹃珦銆
涓銆 Managed Providers
濡傛灉浣犳槸鍒濆鑰咃紝鍙兘浣犱細闂紝浠涔堟槸"Managed Providers"锛
Managed Providers鎻愪緵绠鍗曠殑鏂规硶杩炴帴鍜岃闂暟鎹簱锛屾湁鐐圭被浼间簬鏁版嵁搴撹繛鎺ワ紝褰撶劧鍙堟瘮瀹冨己鐨勫銆侻anaged Providers鎻愪緵OleDb鍜孲QL Server涓ょ缂栫▼鎺ュ彛銆傚洜涓篠QL Server鏄井杞嚜宸辩殑浜у搧锛屽洜姝わ紝涓撻棬鎻愪緵浜嗕竴涓拡瀵筍QL Server鐨勬帴鍙ｏ紝浣跨敤杩欎釜鎺ュ彛璁块棶SQL Server鐨勬晥鐜囧簲璇ユ瘮浣跨敤OleDb寮恒
NameSpaces
鏈枃鎵鏈夌殑渚嬪瓙绋嬪簭閮介渶瑕佷娇鐢ㄤ互涓婲ameSpaces锛
锛%@ Import Namespace="System.Data" %锛
銆銆锛%@ Import Namespace="System.Data.Oledb" %锛
Connection
涓轰簡杩炴帴鏁版嵁搴擄紝蹇呴』浣跨敤OleDbConnection锛
Dim objConn as New OleDBConnection
銆銆("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:\sff\site\db\users.mdb")
褰撶劧锛屼綘涔熷彲浠ュ皢鍏蜂綋鐨勮繛鎺ユ柟娉曚綔涓哄彉閲忎娇鐢紝鍦ㄨ繛鎺ユ暟鎹簱浠ュ悗锛屽繀椤绘墦寮鏁版嵁搴擄細
objConn.Open()
杩欐牱锛屽氨鍙互浣跨敤鏁版嵁搴撲簡锛屼竴鑸湪鏈鍚庯紝鎴戜滑閮借姹傚叧闂暟鎹簱杩炴帴锛
objConn.Close()
銆銆objConn=Nothing
銆銆Command
杩炴帴鏁版嵁搴撲互鍚庯紝灏卞彲浠ュ彂閫佸懡浠ゅ鏁版嵁搴撹繘琛屾搷浣滀簡锛孫leDbCommand鍏佽鍙戦佸懡浠ゅ鏁版嵁搴撹繘琛屾搷浣溿傛牴鎹彂閫佺殑SQL璇彞锛屾垜浠彲浠ュ鏁版嵁搴撹繘琛屽嚑涔庢墍鏈夋搷浣溿
Dim objCmd as New OleDbCommand("SELECT * From users", objConn)
浠ヤ笂璇彞寤虹珛Command锛屾牴鎹範鎯笉鍚岋紝涔熷彲浠ヤ娇鐢ㄤ互涓嬫柟娉曪細
Dim objCmd as New OleDbCommand()
objCmd.Connection = objConn
objCmd.CommandText = "SELECT * FROM users"
杩樺彲浠ヨ繖鏍凤細
Dim objCmd as New OleDbCommand(SQL String, connection string)
浠旂粏瑙傚療涓婇潰鐨勮鍙ワ紝鎴戜滑鍙戠幇鍦ㄥ畾涔塐leDbCommand鏃讹紝鍙互鍚屾椂浣跨敤鏁版嵁搴撹繛鎺leDbConnection鍜屾暟鎹簱杩炴帴璇彞銆備互涓婁唬鐮佸苟娌℃湁鎵цSQL璇彞锛岀幇鍦ㄦ垜浠潵鐪嬪埌搴曟庢牱鎵ц锛
ExecuteNonQuery
褰撴墽琛屾病鏈夎繑鍥炴暟鎹殑鎿嶄綔鐨勬椂鍊欙紝鎴戜滑鍙互浣跨敤浠ヤ笂鏂规硶锛屾瘮濡傛彃鍏ユ暟鎹佹洿鏂版暟鎹瓑鎿嶄綔锛屽叿浣撹繖鏍锋墽琛岋細
objCmd.ExecuteNoQuery
銆銆ExecuteReader
鍦ㄩ渶瑕佷竴涓狣ata Reader鐨勬椂鍊欙紝鎴戜滑鍙互浣跨敤浠ヤ笂鏂规硶锛屽叿浣撹繖鏍锋墽琛岋細
Dim objRd as OleDbDataReader
銆銆objRd = objCmd.ExeuteReader
ExecuteScalar
浣跨敤ExecuteScalar鏂规硶鏉ュ彇寰椾竴涓崟涓湴杩斿洖鏁版嵁锛屾瘮濡傚鏁版嵁鐨勭粺璁°
Data Reader
OleDbReader鏄笓闂ㄧ敤鏉ヨ鍙栨暟鎹殑瀵硅薄锛岃繖涓璞￠櫎浜嗚鏁版嵁浠ュ锛屼笉鑳藉仛鍏朵粬浠讳綍鏁版嵁搴撴搷浣溿傚敖绠℃瘮杈冪畝鍗曪紝浣嗘槸鍦ㄧ敤鏉ユ祻瑙堟暟鎹殑鏃跺欐晥鐜囨槸闈炲父楂樼殑銆
Dim objReader as OleDbDataReader
銆銆objReader = objCmd.ExecuteReader
銆銆While objReader.Read
銆銆Response.Write(objReader.GetString(0) & "锛渂r锛")
銆銆End While
浠ヤ笂璇彞璇诲彇Command鐨勮繑鍥炵粨鏋滅殑绗竴涓瓧娈碉紝杩欎釜瀛楁鏄瓧绗﹀瀷鏁版嵁銆傛垜浠彲浠ヤ娇鐢ㄥ叾浠栨柟娉曞彇寰楀悇绉嶇被鍨嬬殑鏁版嵁锛
GetBoolean(x)
銆銆GetByte(x)
銆銆GetBytes(x)
銆銆GetChar(x)
銆銆GetChars(x)
銆銆GetDataTypeName(x) 锛嶅彇寰楁暟鎹被鍨
銆銆GetDateTime(x)
銆銆GetDecimal(x)
銆銆GetDefaultStream(x)
銆銆GetDouble(x)
銆銆GetFieldType(x)
銆銆GetFloat(x)
銆銆GetGuid(x)
銆銆GetInt16(x)
銆銆GetInt32(x)
銆銆GetInt64(x)
銆銆GetName(x) 锛 鍙栧緱瀛楁鍚
銆銆GetOrdinal(name) 锛嶆牴鎹瓧娈靛悕鍙栧緱瀛楁搴忓彿
銆銆GetString(x)
銆銆GetTimeSpan(x)
銆銆GetValue(x)
銆銆GetValues(values())
浠ヤ笂鏂规硶閮芥槸Command杩斿洖鏁版嵁銆
Data Adapter
OleDbDataAdapter鍙栧緱鏁版嵁骞朵笖鏁版嵁涓嶥ataSet涔嬮棿寤轰竴搴фˉ姊侊紝鍙互杩欐牱浣跨敤锛
Dim objAdapter as New OleDbDataAdapter("SELECT * FROM users", objConn)
瀹炵幇鏂规硶鏈夌偣绫讳技浜嶰leDbCommand銆侽leDbAdapter鍙互濉厖DataSet锛屼篃鍙互淇敼鏁版嵁鐒跺悗鎻愪氦浠ュ疄鐜板鍏蜂綋鏁版嵁鐨勪慨鏀癸細
Dim ds as Dataset = New DataSet()
銆銆objAdapter.Fill(ds, "users")
浠ヤ笂璇彞瀹炵幇灏哠QL璇彞鍙栧緱鐨刄sers琛ㄧ殑鏁版嵁濉厖鍒癉ataSet銆
Mappings鍙互瀹炵幇瀵笵ataSet鐨勫垪鍙栧埆鍚嶏細
[8] [9]
