VBnet连接各类数据库源码

合集下载

NET中各种数据库连接大全

NET中各种数据库连接大全

.NET中各种数据库连接大全2003-1-20 动网先锋SQL ServerODBCStandard Security:"Driver={SQL Server};Server=Aron1;Database=pubs;Uid=sa;Pwd=asdasd;"Trusted connection:"Driver={SQL Server};Server=Aron1;Database=pubs;Trusted_Connection=yes;"Prompt for username and password:oConn.Properties("Prompt") = adPromptAlwaysoConn.Open "Driver={SQL Server};Server=Aron1;DataBase=pubs;"OLEDB, OleDbConnection (.NET)Standard Security:"Provider=sqloledb;Data Source=Aron1;Initial Catalog=pubs;User Id=sa;Password=asdasd;" Trusted Connection:"Provider=sqloledb;Data Source=Aron1;Initial Catalog=pubs;Integrated Security=SSPI;"(use serverName\instanceName as Data Source to use an specifik SQLServer instance, only SQLServer2000)Prompt for username and password:oConn.Provider = "sqloledb"oConn.Properties("Prompt") = adPromptAlwaysoConn.Open "Data Source=Aron1;Initial Catalog=pubs;"Connect via an IP address:"Provider=sqloledb;Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=pubs;User ID=sa;Password=asdasd;"(DBMSSOCN=TCP/IP instead of Named Pipes, at the end of the Data Source is the port to use (1433 is the default))SqlConnection (.NET)Standard Security:"Data Source=Aron1;Initial Catalog=pubs;User Id=sa;Password=asdasd;"Trusted Connection:"Data Source=Aron1;Initial Catalog=pubs;Integrated Security=SSPI;"(use serverName\instanceName as Data Source to use an specifik SQLServer instance, only SQLServer2000)Connect via an IP address:"Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=pubs;User ID=sa;Password=asdasd;"(DBMSSOCN=TCP/IP instead of Named Pipes, at the end of the Data Source is the port to use (1433 is the default))Declare the SqlConnection:C#:using System.Data.SqlClient;SqlConnection oSQLConn = new SqlConnection();oSQLConn.ConnectionString="my connectionstring";oSQLConn.Open();:Imports System.Data.SqlClientDim oSQLConn As SqlConnection = New SqlConnection()oSQLConn.ConnectionString="my connectionstring"oSQLConn.Open()Data ShapeMS Data Shape"Provider=MSDataShape;Data Provider=SQLOLEDB;Data Source=Aron1;Initial Catalog=pubs;User ID=sa;Password=asdasd;"Read moreHow to define wich network protocol to useExample:"Provider=sqloledb;Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=pubs;User ID=sa;Password=asdasd;"Name Network librarydbnmpntw Win32 Named Pipesdbmssocn Win32 Winsock TCP/IPdbmsspxn Win32 SPX/IPXdbmsvinn Win32 Banyan Vinesdbmsrpcn Win32 Multi-Protocol (Windows RPC)Important note!When connecting through the SQLOLEDB provider use the syntax Network Library=dbmssocn and when connecting through MSDASQL provider use the syntax Network=dbmssocnAll SqlConnection connectionstring propertiesThis table shows all connectionstring properties for the SqlConnection object. Most of the properties are also used in ADO. All properties and descriptions is from msdn.Name Default DescriptionApplication Name The name of the application, or '.Net SqlClient Data Provider' if no application name is provided.AttachDBFilename-or-extended properties-or-Initial File Name The name of the primary file, including the full path name, of an attachable database. The database name must be specified with the keyword 'database'.Connect Timeout-or-Connection Timeout 15 The length of time (in seconds) to wait for a connection to the server before terminating the attempt and generating an error.Connection Lifetime 0 When a connection is returned to the pool, its creation time is compared with the current time, and the connection is destroyed if that time span (in seconds) exceeds the value specified by connection lifetime. Useful in clustered configurations to force load balancingbetween a running server and a server just brought on-line.Connection Reset 'true' Determines whether the database connection is reset when being removed from the pool. Setting to 'false' avoids making an additional server round-trip when obtaining a connection, but the programmer must be aware that the connection state is not being reset. Current Language The SQL Server Language record name.Data Source-or-Server-or-Address-or-Addr-or-Network Address The name or network address of the instance of SQL Server to which to connect.Enlist 'true' When true, the pooler automatically enlists the connection in the creation thread's current transaction context.Initial Catalog-or-Database The name of the database.Integrated Security-or-Trusted_Connection 'false' Whether the connection is to be a secure connection or not. Recognized values are 'true', 'false', and 'sspi', which is equivalent to 'true'.Max Pool Size 100 The maximum number of connections allowed in the pool.Min Pool Size 0 The minimum number of connections allowed in the pool.Network Library-or-Net 'dbmssocn' The network library used to establish a connection to an instance of SQL Server. Supported values include dbnmpntw (Named Pipes), dbmsrpcn (Multiprotocol), dbmsadsn (Apple Talk), dbmsgnet (VIA), dbmsipcn (Shared Memory) and dbmsspxn (IPX/SPX), and dbmssocn (TCP/IP).The corresponding network DLL must be installed on the system to which you connect. If you do not specify a network and you use a local server (for example, "." or "(local)"), shared memory is used.Packet Size 8192 Size in bytes of the network packets used to communicate with an instance of SQL Server.Password-or-Pwd The password for the SQL Server account logging on.Persist Security Info 'false' When set to 'false', security-sensitive information, such as the password, is not returned as part of the connection if the connection is open or has ever been in an open state. Resetting the connection string resets all connection string values including the password.Pooling 'true' When true, the SQLConnection object is drawn from the appropriate pool, or if necessary, is created and added to the appropriate pool.User ID The SQL Server login account.Workstation ID the local computer name The name of the workstation connecting to SQL Server. NoteUse ; to separate each property.If a name occurs more than once, the value from the last one in the connectionstring will be used. If you are building your connectionstring in your app using values from user input fields, make sure the user can't change the connectionstring by inserting an additional property with another value within the user value.AccessODBCStandard Security:"Driver={Microsoft Access Driver (*.mdb)};Dbq=\somepath\mydb.mdb;Uid=Admin;Pwd=asdasd;"Workgroup:"Driver={Microsoft Access Driver (*.mdb)};Dbq=\somepath\mydb.mdb;SystemDB=\somepath\mydb.mdw;","admin", "" OLEDB, OleDbConnection (.NET)Standard security:"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;User Id=admin;Password=asdasd;"Workgroup (system database):"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;Jet OLEDB:System Database=system.mdw;","admin", ""With password:"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\somepath\mydb.mdb;Jet OLEDB:Database Password=MyDbPassword;","admin", ""OracleODBCNew version:"Driver={Microsoft ODBC for Oracle};Server=OracleServer.world;Uid=Username;Pwd=asdasd;" Old version:"Driver={Microsoft ODBC Driver for Oracle};ConnectString=OracleServer.world;Uid=myUsername;Pwd=myPassword;"OLEDB, OleDbConnection (.NET)Standard security:"Provider=msdaora;Data Source=MyOracleDB;User Id=UserName;Password=asdasd;"This one's from Microsoft, the following are from OracleStandard Security:"Provider=OraOLEDB.Oracle;Data Source=MyOracleDB;User Id=Username;Password=asdasd;" Trusted Connection:"Provider=OraOLEDB.Oracle;Data Source=MyOracleDB;OSAuthent=1;"OracleConnection (.NET)"Data Source=Oracle8i;Integrated Security=yes";This one works only with Oracle 8i release 3 or laterDeclare the OracleConnection:C#:using System.Data.OracleClient;OracleConnection oOracleConn = new OracleConnection();oOracleConn.ConnectionString = "my connectionstring";oOracleConn.Open();:Imports System.Data.OracleClientDim oOracleConn As OracleConnection = New OracleConnection()oOracleConn.ConnectionString = "my connectionstring"oOracleConn.Open()Data ShapeMS Data Shape:"Provider=MSDataShape.1;Persist Security Info=False;Data Provider=MSDAORA;Data Source=orac;user id=username;password=mypw"MySQLODBCLocal database:"Driver={mySQL};Server=mySrvName;Option=16834;Database=mydatabase;"Remote database:"Driver={mySQL};Server=;Port=3306;Option=131072;Stmt=;Database=my-dat abase;Uid=username;Pwd=password;"OLEDB, OleDbConnection (.NET)Standard:"Provider=MySQLProv;Data Source=mydb;User Id=UserName;Password=asdasd;" MySqlConnection (.NET)EID:"Data Source=server;Database=mydb;User ID=username;Password=pwd;Command Logging=false"This one is used with eInfoDesigns dbProvider, an add-on to .NETDeclare the MySqlConnection:C#:using EID.MySqlClient;MySqlConnection oMySqlConn = new MySqlConnection();oMySqlConn.ConnectionString = "my connectionstring";oMySqlConn.Open();:Imports EID.MySqlClientDim oMySqlConn As MySqlConnection = New MySqlConnection()oMySqlConn.ConnectionString = "my connectionstring"oMySqlConn.Open()OLEDB, OleDbConnection (.NET) from msTCP/IP:"Provider=DB2OLEDB;Network Transport Library=TCPIP;Network Address=XXX.XXX.XXX.XXX;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW"APPC:"Provider=DB2OLEDB;APPC Local LU Alias=MyAlias;APPC Remote LU Alias=MyRemote;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW"SybaseODBCStandard:"Driver={SYBASE SYSTEM 11};Srvr=Aron1;Uid=username;Pwd=password;"Intersolv 3.10:"Driver={INTERSOLV 3.10 32-BIT Sybase};Srvr=Aron1;Uid=username;Pwd=password;" InformixODBCInformix 3.30:"Dsn='';Driver={INFORMIX 3.30 32 BIT};Host=hostname;Server=myserver;Service=service-name;Protocol=olsoctcp;Database=mydb ;UID=username;PWD=myPwdInformix-CLI 2.5:"Driver={Informix-CLI 2.5 (32 Bit)};Server=myserver;Database=mydb;Uid=username;Pwd=myPwd"DSNODBCDSN:"DSN=myDsn;Uid=username;Pwd=;"File DSN:"FILEDSN=c:\myData.dsn;Uid=username;Pwd=;"ExcelODBCStandard:"Driver={Microsoft Excel Driver (*.xls)};DriverId=790;Dbq=C:\MyExcel.xls;DefaultDir=c:\mypath;"OLE DBStandard:"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyExcel.xls;Extended Properties=Excel 8.0;HDR=Yes;""HDR=Yes;" indicates that the first row contains columnnames, not dataDBF / FoxProODBCstandard:"Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=c:\mydbpath;"OLEDB, OleDbConnection (.NET)standard:"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\folder;Extended Properties=dBASE IV;User ID=Admin;Password="PervasiveODBCStandard:"Driver={Pervasive ODBC Client Interface};ServerName=srvname;dbq=@dbname"UDLUDLUDL:"File Name=c:\myDataLink.udl;"OpenFileDialog openFileDialog = new OpenFileDialog();openFileDialog.Filter = "xls文件(*.xls)|*.doc|xls文件(*.doc)|*.doc";if (openFileDialog.ShowDialog() == DialogResult.OK){string FileName = openFileDialog.SafeFileName;comboBox1.Text = FileName;。

vb 链接数据库

vb 链接数据库
2、用The OLE DB .NET Data Provider连接数据库
上面已经说过,利用The OLE DB .NET Data Provider可以访问Access、Oracle和SQL Server等种数据库,那么,它是怎样访问这些数据库的呢?The OLE DB .NET Data Provider是通过位于名称空间System.Data.OleDb类库下的OleDbConnection类来连接这三种不同类型的数据库的。
Dim strConnect As Sting=”Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\Data\ Example.mdb”
oleDbConnection1= New System.Data.OleDb.OleDbConnection(strConnect)
1)连接Sql Server数据库
Dim odbcDbConnetion1 As Microsoft.Data.OdbcConnection
Dim strConnect As Sting=”Driver={SQL Server};Server=服务器名;Uid=sa;pwd=;Database= 数据库名;”
例:
dim conn as SqlConnection
dim da as SqlDataAdapter
dim ds as Dataset
set conn = new SqlConnection
conn.ConnectionString="server=serverIP;database=databasename;uid=userid;pwd=password";

VB.net数据库编程(03):一个SQLserver连接查询的简单例子

VB.net数据库编程(03):一个SQLserver连接查询的简单例子

数据库编程(03):一个SQLserver连接查询的简单例子这个例子,由于在入门已经专门学了,再次进行复习一下。

主要掌握连接字串的情况。

过程就是:1、引用System.Data.SqlClient。

而Access中引用的是System.Data.OleDB.所以是有区别的2、相关连接、适配器、数据集。

3、DataGridView绑定显示。

连接字串如下:Data Source IP地址或计算名(数据库所在位置的),如果是本地计算机可以用(local)或直接用.来代替,或者本地IP:127.0.0.1代替。

Initial Catalog 数据库名Integrated Security 安全连接情况(真或假),若是Windows验证方式则为真,若是用户名及密码登录则为假。

User ID 上项为假时,提供用户名Password ...................,提供密码。

因此,就上面五项就瓮中保证了字串。

如:本地上Sales数据库,用户名为sa,密码为123456,各项之间用分号隔开,则字串为如下:Data Source=(Local);Initial Catalog=Sales;Integrated Security=False;User ID=sa;Password=123456;因为在本地所以用了(Local),还可直接用点号来代替,同时若本地计算机名为Zheng,还可用Zheng。

下面正题:在SQlServer2012中建立一个Sales数据库,再在其中建立一个表grade.情况如下:打开VS2012,建立一个窗体,添加一DataGridView控件,双击窗体建立代码:[vb]view plaincopyprint?1.Imports System.Data.SqlClient2.3.Public Class Form14.Dim cn As SqlConnection5.Dim da As SqlDataAdapter6.Dim ds As DataSet7.Private Sub Form1_Load(sender As Object, e As EventArg s) Handles MyBase.Load8.Dim cnStr As String = "Data Source=(local);Initial Catalog =Sales;Integrated Security=False;User ID=sa;Password=123456;" = New SqlConnection(cnStr)10.da = New SqlDataAdapter("select * from grade", cn)11.ds = New DataSet()12.da.Fill(ds, "grade")13.DataGridView1.DataSource = ds.Tables("grade")14.End Sub15.End Class运行结果如下:本例只须记住SQlserver连接时,连接字串的“5个”关键值就行了。

VB.NET连接SQLite数据库的方法

VB.NET连接SQLite数据库的方法

连接SQLite数据库的方法连接SQLite数据库的方法但是SQLite数据库确实是一款很不错的嵌入式数据库,对于日访问量10000是绝对没有问题的。

我们可以将它作为软件本地的数据库使用,目的是记录一些不是必需上传数据库的信息,比如登录次数等。

这是非常好的。

所以,我们必须使用第三方类库。

这里我推荐的是System.Data.SQLite类库,他的支持性比较好。

下载:下载一个Setup.exe版本即可。

其他安装什么的略过。

这里会出现一个问题,就是安装完以后,类库本身的System.Data.SqlClient可能会出现错误,提示指向不明确。

没有问题,关闭Visual Studio 2005,重新删除、安装即可。

System.Data.SQLIte提供了一组链接数据库,操作数据库的一组方法,得到的数据库、表本身不能被直接使用(至少我没有尝试出)。

所以我们可以使用mon下的类库来实现。

可以这么理解我今天聚的例子:通过mon的DbConnection、mon.DbProviderFactory、mon.DbTransaction这些熟悉的对象来操作,其他例如链接、插入部分,我们使用SQLite提供的组件。

System.Data.SQLite如何使用?System.Data.SQLite.SQLiteConnection.CreateFile("DataBase. db") 创建数据库文件。

如果有,则不会新建。

这样一来,我们只需要把System.Data.SQLIte.SQLiteFactory.Instance赋值给一个mon.DbProviderFactory对象即可。

然后其他操作全部基于DbProviderFactory来进行连接、查询、增删改即可。

代码如下:' 创建数据库文件'File.Delete("test1.db3")System.Data.SQLite.SQLiteConnection.CreateFile("test.db") Dim factory As mon.DbProviderFactory = SQLiteFactory.InstanceUsing conn As mon.DbConnection = factory.CreateConnection()' Dim conn As mon.DbConnection = factory.CreateConnection()' 连接数据库conn.ConnectionString = "Data Source=test.db"conn.Open()'创建数据表Dim sql As String = "create table [test1] ([id] INTEGER PRIMARY KEY, [s] TEXT COLLATE NOCASE)"Dim cmd As DbCommand = conn.CreateCommand()cmd.Connection = connmandText = sqlcmd.ExecuteNonQuery()' 添加参数cmd.Parameters.Add(cmd.CreateParameter())' 开始计时Dim watch As Stopwatch = New Stopwatch()watch.Start()Dim trans As DbTransaction = conn.BeginTransaction() ' <-------------------Try' 连续插入1000条记录For i As Integer = 0 To 1000mandText = "insert into [test1] ([s]) values (?)"cmd.Parameters(0).Value = i.ToStringcmd.ExecuteNonQuery()NextmandText = "select * from [test1]"Dim db As DbDataReader = cmd.ExecuteReader()While db.Read'TextBoxTest.Text = TextBoxTest.Text & db.Item(0) & " | " & db.Item(1)End Whilemit() ' <-------------------Catch ex As Exceptiontrans.Rollback() ' <-------------------Throw ' <-------------------'关闭数据库conn.close()End Try' 停止计时watch.Stop()MsgBox(watch.Elapsed.ToString)End Using整个代码做的就是生成一个数据库文件,新建一张表,插入1000行记录,并且计算插入的时间是多少。

vb.net連接Oracle数据库

vb.net連接Oracle数据库

連接Oracle数据库Imports Oracle.DataAccess.Client '導⼊命名空間Public Class Form1Dim Sql As StringPublic SqlTP As OracleConnection = New OracleConnection("Password= ""密碼"";Persist Security Info=True;User ID=帳號;Data Source=資料庫") Public CmdTP As New OracleCommandPublic drTP As OracleDataReaderPublic Sub OpenTP()'打开Oracle連線If SqlTP.State = ConnectionState.Closed ThenSqlTP.Open()End IfmandText = SqlmandType = CommandType.TextCmdTP.Connection = SqlTPdrTP = CmdTP.ExecuteReader()End SubPublic Sub CloseTP()'关闭Oracle連線drTP.Close()If SqlTP.State = ConnectionState.Open ThenSqlTP.Dispose()End IfEnd SubPrivate Sub A1()Dim i, n As IntegerDim TP0 As StringSql = ("SELECT COUNT(*) FROM SH01.OGA_FILE")OpenTP()drTP.Read()n = drTP.Item(0)'筆數CloseTP()Sql = ("SELECT SH01.OGA_FILE.OGA02 FROM SH01.OGA_FILE")OpenTP()For i = 1 To ndrTP.Read()'下⼀筆TP0 = drTP.Item(0)'內容NextCloseTP()End SubEnd Class安装oracle客⼾端这⾥点“下⼀步”这⾥点“下⼀步”选择“管理员”,再点“下⼀步”记住这⾥的路径,下⾯要⽤到;再点“下⼀步”这⾥点“下⼀步”继续这⾥点“安装”继续安装进⾏中……选择“执⾏典型配置”再点“下⼀步”这⾥点“下⼀步”继续点击“完成”完成安装,出来后退出安装结束。

VB_net连接MySQL数据库方法

VB_net连接MySQL数据库方法

操作MySQL数据库方法1.连接数据库1)下载Connector/Net:/downloads/connector/net/2)安装Connector/Net.3)在工程中,选择Project->Add Reference…菜单,添加MySQl.data 引用,如下图所示:4)在需要连接数据的文件中添加一行,以打开namespace:Imports MySql.data.MySqlClient5)创建一个数据库连接m_strConnection ="server=127.0.0.1;uid=root;pwd=12345;database=computer; pooling=false"m_SqlConn = New MySqlConnection(m_strConnection)2.显示数据1)创建一个数据库适配器Dim strQuery As String = "select * from Product"Dim daAdapter As MySqlDataAdapter = New MySqlDataAdapter(strQuery, m_SqlConn)2)创建一个Datatable,用数据库适配器来填充datatableDim dsTable As DataTable = New DataTable(strDataset)daAdapter.Fill(dsTable)3)绑定datatable到DataGrid控件dbGridShow.SetDataBinding(dsTable, "")dbGridShow.Visible = True3.获取表中的某一行某一列‘获得指定行Dim CurRow As IntegerCurRow = dbGridShow.CurrentRowIndexDim tbl As DataTable = dbGridShow.DataSourceDim Row As DataRow = tbl.DefaultView(CurRow).Row'根据当前选定的行得到Delete操作的SQL语句Dim strDelete As StringstrDelete = "delete from T_Bars where name = '" + Row("name") + "'"4.修改或删除数据'定义操作的SQL语句Dim strSql As StringstrSql = "insert into Product(maker,model,type) values('"…”)'创建SqlCommand对象Dim myCommand As MySqlCommand = New MySqlCommand(strInsertCommand, m_SqlConn) ‘执行操作m_SqlConn.Open()nRows = myCommand.ExecuteNonQuery()。

vbnet数据库编程例子

vbnet数据库编程例子

vbnet数据库编程例子是一种用于开发Windows应用程序的编程语言,它具有强大的数据库编程能力。

下面将列举10个数据库编程的例子,以帮助读者更好地理解和掌握数据库编程的技巧。

1. 连接数据库并查询数据提供了多种连接数据库的方式,可以使用来连接各种类型的数据库,如SQL Server、MySQL等。

通过使用连接字符串,可以轻松地连接到数据库,并执行SQL查询语句来检索数据。

2. 插入数据使用可以通过执行INSERT语句将数据插入数据库表中。

可以通过构建SQL INSERT语句,并使用的Command对象来执行该语句。

3. 更新数据通过执行UPDATE语句,可以使用更新数据库表中的数据。

可以根据需要构建SQL UPDATE语句,并使用Command对象执行该语句。

4. 删除数据使用可以执行DELETE语句来删除数据库表中的数据。

可以构建SQL DELETE语句,并使用Command对象执行该语句。

5. 使用事务使用可以创建事务来确保数据库操作的原子性。

可以使用Transaction对象来开始、提交或回滚事务。

6. 使用参数化查询为了提高数据库查询的安全性和性能,可以使用参数化查询。

提供了SqlParameter类来创建参数,并将其与SQL查询语句一起使用。

7. 使用存储过程存储过程是在数据库中预定义的一组SQL语句。

使用可以调用存储过程并传递参数,以执行一系列数据库操作。

8. 使用数据适配器填充数据集数据适配器是连接数据源和数据集的桥梁。

使用可以创建数据适配器,并使用Fill方法将数据库中的数据填充到数据集中。

9. 使用数据绑定显示数据数据绑定是将数据与用户界面进行关联的一种技术。

使用可以将数据集中的数据绑定到各种控件上,以显示数据库中的数据。

10. 处理数据库异常在数据库编程中,可能会出现各种异常情况,如连接失败、查询出错等。

使用可以通过使用Try-Catch块来捕获和处理这些异常,以保证程序的健壮性。

VB.NET连接数据库的几种方法

VB.NET连接数据库的几种方法

Microsoft Visual 是Microsoft Visual Basic 的更新版本,它基于.NET 的框架结构,能使用户非常容易地创建Microsoft Windows操作系统和网络的应用程序。

使用Visual ,可以快速地实现可视化开发网络应用程序、网络服务、Windows应用程序和服务器端组件。

另外,Visual 为Windows应用程序提供了XCOPY部署,开发人员不再需要为DLL的版本问题担忧。

Visual Basic现在已经真正成为面向对象以及支持继承性的语言。

窗体设计器支持可视化继承,并且包含了许多新的特性,比如自动改变窗体大小、资源本地化以及可达性支持。

数据类工具内在支持XML数据,在设计时数据绑定使用断开的数据。

另外,Visual 直接建立在.NET的框架结构上,因此开发人员可以充分利用所有平台特性,也可以与其他的.NET语言交互。

在这篇文章中我要跟大家讲的,是介绍Visual 的数据库编程及其相关知识。

一、先介绍和ADO .NET由Microsoft ActiveX Data Objects (ADO)改进而来,它提供平台互用和可收缩的数据访问功能,是Visual 进行数据库编程所使用的重要工具使用了某些ADO的对象,如Conn ection和Comma nd对象,并且还引入了新的对象。

主要的新对象包括DataSet、DataReader和DataAdapter。

是.NET框架中另外一个很有用的用于数据库开发的类库。

但是,在.NET FrameWork SDK1.0版中不包含,要使用请到微软网站下载,具体下载地址:http://msd n. /library/default.asp?url=/dow nloads/list /netdevframework.asp (文件名是odbc_net.ms)在默认情况下,安装路径是“C: ”。

安装后组件名为Microsoft.Data.Odbc.dll 文件。

vb.net数据库连接池的连接字符串写法

vb.net数据库连接池的连接字符串写法

数据库连接池的连接字符串写法在 中,连接字符串是用来建立与数据库之间的连接的关键元素。

连接字符串的写法取决于你使用的数据库类型和数据库引擎。

以下是一个示例连接字符串,用于连接到Microsoft SQL Server 数据库的连接池:```Imports System.Data.SqlClientModule Module1Sub Main()Dim connectionString As String = "Data Source=YourServerName;Initial Catalog=YourDatabaseName;User ID=YourUsername;Password=YourPassword;Integrated Security=False;Max Pool Size=100;Pooling=True;"Dim connection As New SqlConnection(connectionString)Tryconnection.Open()' 连接已经打开,可以执行数据库操作Console.WriteLine("Connected to SQL Server")Catch ex As ExceptionConsole.WriteLine("Error: " & ex.Message)Finallyconnection.Close()End TryEnd SubEnd Module```在这个示例中,你需要替换`YourServerName`、`YourDatabaseName`、`YourUsername` 和`YourPassword` 分别为你的SQL Server 的实际信息。

`Max Pool Size` 和`Pooling` 是用于配置连接池的选项,它们指定了连接池的最大大小和是否启用连接池。

VBnet数据库操作

VBnet数据库操作

' 连接SQL数据库的方法(一) [采用数据集]'==================================================' 在窗体上添加一个DataGrid控件命名为DataGrid1.在窗体加载事件Load里写入以下代码:Dim 数据库连接As New OleDb.OleDbConnection("Provider=SQLOLEDB;User ID=sa;Password=;Initial Catalog=FKapp;data Source=.")' 这里<连接字符串>"'<连接字符串>可以自动生成(Connect Timeout=30)超时时间30秒' 或数据库连接.ConnectionTimeout =30Dim 数据适配器As New OleDb.OleDbDataAdapter("select * from tab_load", 数据库连接)' 这里是SQL语句Dim 数据集As New DataSet '定义一个数据集数据适配器.Fill(数据集, "tab_load") '加载数据到数据集DataGrid1.DataSource = 数据集.Tables("tab_load") '显示出数据MsgBox("这是数据集中第0 张表的第2行的name列的数据:" & 数据集.Tables(0).Rows(2)("name"))MsgBox("这是数据集中第0 张表的第0行第0列的数据:" & 数据集.Tables(0).Rows(0).Item(0)) MsgBox("这是数据集中tab_load表的第1行的password列的数据:" & 数据集.Tables("tab_load").Rows(1).Item("password"))' 连接SQL数据库的方法(二) [采用数据读取器]'=====================================================' 在窗体上添加一个ComboBox控件命名为ComboBox1.在窗体加载事件Load里写入以下代码: '创建连接Dim 数据库连接As New OleDb.OleDbConnection("Provider=SQLOLEDB;User ID=sa;Password=;Trusted_Connection=yes;Initial Catalog=FKapp;data Source=.")'连接打开数据库连接.Open()'定义SQL查询语句Dim SQL语句As OleDb.OleDbCommand = New OleDb.OleDbCommand("select * from tab_load", 数据库连接)'读取数据源行记录Dim 数据读取器As OleDb.OleDbDataReader数据读取器= SQL语句.ExecuteReader '发送SQL语句Do While 数据读取器.Read '循环获得记录boBox1.Items.Add(Trim(数据读取器.Item("name")))'添加数据项目到ComboBox列表中Loop数据库连接.Close() '关闭连接' 添加、删除、修复SQL数据记录的方法(直接型)'======================================================'连接到一个数据库Dim 数据库连接As New OleDb.OleDbConnection("Provider=SQLOLEDB;User ID=sa;Password=;Initial Catalog=FKapp;data Source=.")数据库连接.Open() '打开连接'删除SQL数据记录的方法(直接删除)'数据源执行的SQL语句'--------------------------------------------------------------------------------------------Dim 数据适配器As New OleDb.OleDbCommand("delete from tab_load where name='nba'", 数据库连接)'---------------------------------------------------------------------------------------------'从数据库中删除指定记录数据适配器.ExecuteNonQuery() '执行数据库连接.Close() '关闭连接' 数据库OleDb.OleDbCommand语句定义======================================================='更新SQL数据记录的方法(直接更新)'数据源执行的SQL语句Dim 数据适配器As New OleDb.OleDbCommand("Update tab_load SET name='ok',password='no',jibie='B' where name='admin'", 数据库连接)'插入SQL数据记录的方法(直接插入)'数据源执行的SQL语句Dim 数据适配器As New OleDb.OleDbCommand("Insert INTO tab_load(name,password,jibie)VALUES('1555','2','3')", 数据库连接)'OleDbCommand里可写常用的SQL语句-例:创建数据库等'连接到一个数据库Dim 数据库连接As New OleDb.OleDbConnection("Provider=SQLOLEDB;User ID=sa;Password=;data Source=.;Connect Timeout=10")数据库连接.Open() '打开连接'从数据库中修改指定记录Dim 数据适配器As New OleDb.OleDbCommand("Create DATABASE FKapp", 数据库连接) '数据源执行的SQL语句数据适配器.ExecuteNonQuery() '执行-创建数据数据库连接.Close() '关闭连接'重新设置连接字符串数据库连接.ConnectionString = "Provider=SQLOLEDB;User ID=sa;Password=;Initial Catalog=FKapp;data Source=.;Connect Timeout=10"数据库连接.Open() '再次打开连接'设置数据源执行的SQL语句数据适配器.CommandText = "Create table tab_load(name varchar(20) not null Primary Key,password varchar(16) not null, jibie varchar(1) null)"数据适配器.ExecuteNonQuery() '执行-创建表'开始向表中插入记录数据适配器.CommandText = "insert into tab_load values('Admin','admin','A')"数据适配器.ExecuteNonQuery() '执行-插入记录数据适配器.CommandText = "insert into tab_load values('feikeq','FK','B')"数据适配器.ExecuteNonQuery() '执行-插入记录数据适配器.CommandText = "insert into tab_load values('FIFA2006','2006','C')"数据适配器.ExecuteNonQuery() '执行-插入记录数据适配器.CommandText = "insert into tab_load values('NIIT','NIIT','C')"数据适配器.ExecuteNonQuery() '执行-插入记录数据库连接.Close() '关闭连接。

试验五VBNET与数据库的连接

试验五VBNET与数据库的连接

实验五与数据库的连接一、实验目的1.熟悉.net平台窗口和控件的基本编程方法;2.掌握与SQL SERVER数据库的连接方法。

二、实验内容:1、建立一个项目文件,在项目中创建三个窗口对象,设计代码完成多个窗口的切换功能;2、掌握与SQLServer之间的连接方法,并通过datagrid控件显示数据库tjdb的“客户”表的信息。

实验结果界面如图5.1。

图5.1三、实验指导1.对于实验内容1,在各窗口间如果需要进行公共变量传递,则需建立一个公共模块,将公共变量定义在模块内即可。

例如,如果有两个窗口进行切换,则可以在公共模块中定义下列代码:Module Module1Public f1 = New Form1Public f2 = New form2End Module然后在项目中的两个Form之间就可以用方法hide()或show()进行切换。

对于公共变量采用同样的方法,在模块中定义,就可以达到多个窗体的共享,从而实现参数的传递。

2.对于实验内容2,操作步骤如下:步骤一:进入,建立项目文件“客户信息”。

启动,单击“新建项目”进入新建项目窗口,项目类型选择“Visual Basic项目”,模版选择“Windows应用程序”,在名称中键入“客户信息”,点击“确定”按钮,进入项目设计窗口。

如图5.2。

图5.2步骤二:在项目窗体设计界面中,将工具箱的DataGrid控件拖至窗体中,见图5.3。

图5.3步骤三:展开窗口左端的“服务器资源管理器”,再展开tjdb,选中“客户”表,并将其拖至窗体,见图5.4。

图5.4步骤四:在窗体任意位置点击右键,选择“生成数据集”,进入“生成数据集”界面,见图5.5。

图5.5点击“确定”按钮,进入窗体设计界面。

如图5.6所示。

图5.6步骤五:双击Form,进入编程窗口。

在Form1_Load过程中输入下列代码:Private Sub Form1_Load(……) Handles MyBase.Load//为控件DataGrid1指定数据源Me.DataGrid1.DataSource = Me.DataSet11.客户//填充数据集Me.SqlDataAdapter1.Fill(Me.DataSet11, "客户")End Sub然后按运行按钮,可以得到如图5.7所示的结果:图5.7实验运行结果。

[VB net2005]SQL数据库连接类

[VB net2005]SQL数据库连接类

[2005]SQL数据库连接类Imports SystemImports System.DataImports System.Data.SqlClientImports System.Data.SqlPublic Class DataBasePrivate cnn As SqlConnection'执行存储过程procName:存储过程的名字returns:返回存储过程返回值Public Function RunProc(ByVal procName As String) As IntegerDim cmd As SqlCommandcmd = CreateCommand(procName)cmd.ExecuteNonQuery()Return cmd.Parameters("ReturnValue").ValueEnd Function'执行存储过程procName:存储过程的名字prams:存储过程所需参数returns:返回存储过程返回值Public Function RunProc(ByVal procName As String, ByVal prams() As SqlParameter) As IntegerDim cmd As SqlCommandcmd = CreateCommand(procName, prams)cmd.ExecuteNonQuery()Return cmd.Parameters("ReturnValue").ValueEnd Function'执行存储过程procName:存储过程的名称dataReader:存储过程所需参数Public Sub RunProc(ByVal procName As String, ByRef dataReader As SqlDataReader)Dim cmd As SqlCommandcmd = CreateCommand(procName)dataReader = cmd.ExecuteReaderEnd Sub'执行存储过程procName:存储过程的名称prams:存储过程所需参数dataReader:存储过程所需参数Public Sub RunProc(ByVal procName As String, ByVal prams() As SqlParameter, ByRef dataReader As SqlDataReader)Dim cmd As SqlCommandcmd = CreateCommand(procName, prams)dataReader = cmd.ExecuteReaderEnd Sub'创建一个SqlCommand对象以此来执行存储过程procname:存储过程的名称prams:存储过程所需参数returns:返回SqlCommand对象Private Function CreateCommand(ByVal procname As String, ByVal prams() As SqlParameter) As SqlCommandIf cnn.State = ConnectionState.Closed Thencnn.Open()End IfDim cmd As New SqlCommand(procname, cnn)mandType = CommandType.StoredProcedureIf Not (prams Is DBNull.Value) ThenDim parameter As SqlParameterFor Each parameter In pramscmd.Parameters.Add(parameter)NextEnd Ifcmd.Parameters.Add(New SqlParameter("ReturnValue", SqlDbType.Int, 4, ParameterDirection.ReturnValue, False, 0, 0, String.Empty, DataRowVersion.Default, System.DBNull.Value))Return cmdEnd Function'创建一个SqlCommand对象以此来执行存储过程procname:存储过程的名称returns:返回SqlCommand对象Private Function CreateCommand(ByVal procname As String) As SqlCommandIf cnn.State = ConnectionState.Closed Thencnn.Open()End IfDim cmd As New SqlCommand(procname, cnn)mandType = CommandType.StoredProcedurecmd.Parameters.Add(New SqlParameter("ReturnValue", SqlDbType.Int, 4, ParameterDirection.ReturnValue, False, 0, 0, String.Empty, DataRowVersion.Default, System.DBNull.Value))Return cmdEnd Function'打开数据库连接strCnn:连接字符串Public Sub Open(ByVal strCnn As String)cnn = New SqlConnection(strCnn)If cnn.State = ConnectionState.Closed Thencnn.Open()End IfEnd Sub'关闭数据库连接Public Sub Close()If cnn.State = ConnectionState.Open Thencnn.Close()End IfEnd Sub'释放资源Public Sub Dispose()If cnn.State = ConnectionState.Closed Thencnn.Dispose()ElseIf cnn.State = ConnectionState.Open ThenClose()cnn.Dispose()Elsecnn.Dispose()End IfEnd Sub'传入输入参数ParamName:存储过程名称DbType:参数类型Size:参数大小Value:参数值returns:新的parameter 对象Public Function MakeInParam(ByVal ParamName As String, ByVal DbType As SqlDbType, ByVal Size As Integer, ByVal Value As Object) As SqlParameterReturn MakeParam(ParamName, DbType, Size, ParameterDirection.Input, Value)End Function'传入输出参数ParamName:存储过程名称DbType:参数类型Size:参数大小returns:新的parameter 对象Public Function MakeOutParam(ByVal ParamName As String, ByVal DbType As SqlDbType, ByVal Size As Integer) As SqlParameter Return MakeParam(ParamName, DbType, Size, ParameterDirection.Output, DBNull.Value)End Function'传入返回值参数ParamName:存储过程名称DbType:参数类型Size:参数大小returns:新的parameter 对象Public Function MakeReturnParam(ByVal ParamName As String, ByVal DbType As SqlDbType, ByVal Size As Integer) As SqlParameterReturn MakeParam(ParamName, DbType, Size, ParameterDirection.ReturnValue, DBNull.Value)End Function'生成存储过程参数ParamName:存储过程名称DbType:参数类型Size:参数大小Direction:参数方向returns:新的parameter 对象Public Function MakeParam(ByVal ParamName As String, ByVal Dbtype As SqlDbType, ByVal Size As Integer, ByVal Direction As ParameterDirection, ByVal Value As Object) As SqlParameterDim param As SqlParameterIf (Size > 0) Thenparam = New SqlParameter(ParamName, Dbtype, Size)Elseparam = New SqlParameter(ParamName, Dbtype)End Ifparam.Direction = DirectionIf (Not (Direction = ParameterDirection.Output And (Value Is DBNull.Value))) Thenparam.Value = ValueEnd IfReturn paramEnd FunctionEnd Class。

VB与数据库连接的几种方法

VB与数据库连接的几种方法

VB与数据库连接的几种方法在VB中,有多种方法可以连接数据库。

以下是几种常见的方法:1. 使用OLE DB连接:OLE DB是Microsoft提供的一种连接数据库的标准接口,可以连接各种类型的数据库。

可以通过VB中的ADO(ActiveX Data Objects)对象来使用OLE DB连接数据库。

以下是一个使用OLE DB连接数据库的示例代码:```Dim conn As New ADODB.Connectionconn.ConnectionString = "Provider=SQLOLEDB;DataSource=ServerName;Initial Catalog=DatabaseName;UserID=Username;Password=Password"conn.Open```上述代码中,通过设置ConnectionString属性来指定数据库连接字符串,其中包含了数据库类型、服务器名称、数据库名称、用户名和密码等信息。

然后调用Open方法打开数据库连接。

2. 使用ODBC连接:ODBC(Open Database Connectivity)也是一种标准的数据库连接接口,可以连接多种类型的数据库。

可以通过VB中的ODBC对象来使用ODBC连接数据库。

以下是一个使用ODBC连接数据库的示例代码:```Dim conn As New ADODB.Connectionconn.ConnectionString = "Driver={SQL Server Native Client 11.0};Server=ServerName;Database=DatabaseName;Uid=Username;Pwd=P assword;"conn.Open```上述代码中,通过设置ConnectionString属性来指定ODBC连接字符串,其中包含了ODBC驱动程序名称、服务器名称、数据库名称、用户名和密码等信息。

vb 11种数据库连接方法

vb 11种数据库连接方法

6.Oracle OLE DB 连接方法:
set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;"
7.dBase 连接方法:
set adocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;"
1.Access数据库的DSN-less连接方法:
set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("数据库所在路径")
11.MS text OLE DB 连接方法:
set adocon=Server.Createobject("adodb.connection")
adocon.open"Provider=microsof.jet.oledb.4.0;data source=your_path;"&_
9.Visual Foxpro 连接方法:
set adocon=Server.Createobject("adodb.connection")

VBNET数据库编程

VBNET数据库编程

2、SelectCommand的属性
Connection:指定连接数据源OleDbConnection 对象。
objDataAdapter.SelectCommand.Connection = objConnection Command:指定选取数据的SQL语句或存储过程。 mandText = "Select no, name, age from student1"
4、清除绑定
控件名.DataBindings.Clear()
例2 从本地SQL Server 2000 数据库Teaching中检索表 student1中的数据,并将其no、name和age字段的值分别 绑定到3个文本框中,在表记录中向前、向后导航。
Dim objDataAdapter As New OleDbDataAdapter() Dim objDataSet As DataSet = New DataSet() Dim objDataView As DataView Dim objCurrencyManager As CurrencyManager
mandType = CommandType.Text objDataAdapter.SelectCommand. ExecuteNonQuery() objDataAdapter.Fill(objDataSet,"student1") objConnection.close() objDataAdapter = Nothing objConnection = Nothing grdStudent1.DataSource = objDataSet grdstudent1.DataMember = "student1"
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
3.C#连接Oracle
程序代码:
--------------------------------------------------------------------------------
using System.Data.OracleClient;
using System.Data;
请求权
1.C#连接连接Access
程序代码:
-------------------------------------------------------------------------------
using System.Data;
using System.Data.OleDb;
程序代码:
--------------------------------------------------------------------------------
using System.Data;
using System.Data.SqlClient;
..
string strConnection="user id=sa;password=;";
首先,连接SQL Server使用的命名空间不是"System.Data.OleDb",而是"System.Data.SqlClient".
其次就是他的连接字符串了,我们一个一个参数来介绍(注意:参数间用分号分隔):
"user id=sa":连接数据库的验证用户名为sa.他还有一个别名"uid",所以这句我们还可以写成"uid=sa".
//将得来的数据填入dataSet
DataGrid1.DataBind();
//绑定数据
OleDbConnection1.Close();
//关闭连接
//增加数据库数据
在Web Form上新增对应字段数量个数的TextBox,及一个button,为该按键增加Click响应事件代码如下:
strConnection这个变量里存放的是连接数据库所需要的连接字符串,他指定了要使用的数据提供者和要使用的数据源.
"Provider=Microsoft.Jet.OleDb.4.0;"是指数据提供者,这里使用的是Microsoft Jet引擎,也就是Access中的数据引擎,就是靠这个和Access的数据库连接的.
while (DBReader.Read())
{
Console.WriteLine("Host = {0} and User = {1}", DBReader.GetString(0),DBReader.GetString(1));
}
}
finally
{ -------------------------------------------------------------------
OleDbConnection1.Open();
//打开数据库连接
OleDbDataAdapter1.Fill(dataSet1,"Address");
..
objConnection.Open();
objConnection.Close();
--------------------------------------------------------------------------------
解释:
连接SQL Server数据库的机制与连接Access的机制没有什么太大的区别,只是改变了Connection对象和连接字符串中的不同参数.
strConnection+="initial catalog=Northwind;Server=YourSQLServer;";
strConnection+="Connect Timeout=30";
SqlConnection objConnection=new SqlConnection(strConnection);
strConnection+="Data Source=";
strConnection+=MapPath("Northwind.mdb");
这样就可以省得你写一大堆东西了!
3.要注意连接字符串中的参数之间要用分号来分隔.
"OleDbConnection objConnection=new OleDbConnection(strConnection);"这一句是利用定义好的连接字符串来建立了一个链接对象,以后对数据库的操作我们都要和这个对象打交道.
DBComm = new MySQLCommand("select Host,User from user",DBConn);
// 读取数据
MySQLDataReader DBReader = DBComm.ExecuteReaderEx();
// 显示数据
try
{
"initial catalog=Northwind":使用的数据源为"Northwind"这个数据库.他的别名为"Database",本句可以写成"Database=Northwind".
"Server=YourSQLServer":使用名为"YourSQLServer"的服务器.他的别名为"Data Source","Address","Addr".如果使用的是本地数据库且定义了实例名,则可以写为"Server=(local)\实例名";如果是远程服务器,则将"(local)"替换为远程服务器的名称或IP地址.
OracleConnection conn=new OracleConnection(ConnectionString);//创建一个新连接
try
{
conn.Open();
OracleCommand cmd=conn.CreateCommand();
mandText="select * from MyTable";//在这儿写sql语句
}
odr.Close();
}
catch(Exception ee)
{
Response.Write(ee.Message); //如果有错误,输出错误信息
}
finally
{
conn.Close(); //关闭连接
}
}
-------------------------------------------------------------------------------
"Connect Timeout=30":连接超时时间为30秒.
在这里,建立连接对象用的构造函数为:SqlConnection.
--------------------------------------------------------------------------------
"password=":连接数据库的验证密码为空.他的别名为"pwd",所以我们可以写为"pwd=".
这里注意,你的SQL Server必须已经设置了需要用户名和密码来登录,否则不能用这样的方式来登录.如果你的SQL Server设置为Windows登录,那么在这里就不需要使用"user id"和"password"这样的方式来登录,而需要使用"Trusted_Connection=SSPI"来进行登录.
OracleDataReader odr=cmd.ExecuteReader();//创建一个OracleDateReader对象
while(odr.Read())//读取数据,如果odr.Read()返回为false的话,就说明到记录集的尾部了
{
Response.Write(odr.GetOracleString(1).ToString());//输出字段1,这个数是字段索引,具体怎么使用字段名还有待研究
..
objConnection.Open();
objConnection.Close();
--------------------------------------------------------------------------------
解释:
连接Access数据库需要导入额外的命名空间,所以有了最前面的两条using命令,这是必不可少的!
//在窗体上添加一个按钮,叫Button1,双击Button1,输入以下代码
private void Button1_Click(object sender, System.EventArgs e)
{
string ConnectionString="Data Source=sky;user=system;password=manager;";//写连接串
"objConnection.Open();"这用来打开连接.至此,与Access数据库的连接完成.
--------------------------------------------------------------------------------
相关文档
最新文档