用VB访问SQL Server数据库技术详解

本文讨论了Visual Basic应用程序访问SQL Server数据库的几种常用的方法，分别说明了每种方法的内部机理并给出了每种方法的一个简单的实例，最后比较了每种方法性能和优缺点。

一、引言　　

SQL Server是微软推出的中小型网络数据库系统，是目前最常用的数据库系统之一。随着SQL Server网络数据库应用程序日益增多，这种Web数据库应用系统的正常运行一般依赖于已存在的用户数据库。创建维护数据库的工作可用SQL Server提供的SQL Enterprise Manager工具来进行，如能提供一种定制的数据库管理工具，通过管理应用程序来管理数据库及其设备，对用户来说无疑是最理想的。

Visual Basic作为一种面向对象的可视化编程工具，具有简单易学，灵活方便和易于扩充的特点。而且Microsoft为其提供了与SQL Server通信的API函数集及工具集，因此它越来越多地用作大型公司数据和客户机—服务器应用程序的前端，与后端的Microsoft SQL Server相结合，VB能够提供一个高性能的客户机—服务器方案。　　

二、VB访问SQL Server数据的常用方法

使用Visual Basic作为前端开发语言，与SQL Server接口有几种常用的方法，即：

①数据访问对象/Jet

②为ODBC API编程

③使用SQL Server的Visual Basic库(VBSQL)为DB库的API编程

④RDO 远程数据对象(RemoteData Objects)

⑤ADO 数据对象(Active Data Objects)

1、数据访问对象/Jet

VB支持Data Access Objects(DAOs)的子集。DAO的方法虽然不是性能最好的管理客户机—服务器之间的对话方式，但它的确有许多优点。DAO/Jet是为了实现从VB访问Access数据库而开发的程序接口对象。使用DAOs访问SQL Server的过程如下：应用程序准备好语句并送至Jet，Jet引擎(MASJT200.DLL)优化查询，载入驱动程序管理器并与之通讯，驱动程序管理器(ODBC.DLL)通过调用驱动器(SQLSRVR.DLL)的函数，实现连接到数据源，翻译并向SQL Server提交SQL语句且返回结果。下面是一个用DAOs访问SQL Server的VB实例。

复制内容到剪贴板

代码:

注释：Form Declarations 

Dim mydb As Database 
Dim mydynaset As Dynaset オ 
Private Sub Form_Load() 
　 Set mydb = OpenDatabase("", False, False, "ODBC; DSN=Myserver; WSID=LCL; DATABASE = sales") 
　 Set mydynaset = mydb CreateDynaset("Select*from Customers") オ 
End Sub

上述例子是以非独占、非只读方式打开sales数据库，并检索Customers表中的所有字段。OpenDatabase函数的最后一个参数是ODBC连接字符串参数，它指明了Microsoft Access连接到SQL Server所需要知道的一些内容。其中“DSN”为数据源名，“WSID”为工作站名，“DATABASE”为所要访问的数据库名。

2、利用ODBC API编程

ODBC(Open Database Connectivity)的思想是访问异种数据库的一种可移植的方式。与数据资源对话的公用函数组装在一个称为驱动程序管理器(ODBC.DLL)的动态连接中。应用程序调用驱动程序管理器中的函数，而驱动程序管理器反过来通过驱动器(SQLSRVR.DLL)把它们送到服务器中。

下面的代码使用上面一些函数先登录到一个服务器数据库，并为随后的工作设置了语句句柄。

复制内容到剪贴板

代码:

Global giHEnv As Long 
Global giHDB As Long 
Global giHStmt As Long 

Dim myResult As integer 
Dim myConnection As Srting 
Dim myBuff As String*256 
Dim myBufflen As Integer 

If SQLAllocEnv(giHEnv)<>SQL_SUCCESS Then 
　 MsgBox"Allocation couldn注释：t happen!" 
End If 
If SQLAllocConnect(giHEnv,giHDB)<>SQL_SUCCESS Then 
　 MsgBox "SQL Server couldn注释：t connect!" 
End If 
myConnection="DSN=myServer;UID=LCL;PWD=;APP=ODBCTest;WSID=LCL;DATABASE=sales" 
　　　myResult=SQLDriverConnect(giHDB,Test,form1.hWnd,myConnection.len(myConnection),
　　　myBuff,256,myBufflen,SQL_DRIVER_COMPLETE_REQU IE D) 
　　 myResult=SQLAllocStmt(giHDS,giHStmt) 
　　 myResult=SQLFreeStmt(giHStmt,SQL_COLSE) 
　　 rsSQL="Select * from Customers Where City = "Hunan"" 
　　 myResult = SQLExecDirect(giHStmt,rsSQL,Len(rsSQL))

3、使用VBSQL对DB库API编程

DB库是SQL Server的本地API，SQL Server的Visual Basic库(VBSQL)为Visual Basic程序员提供API。从一定意义上说，VBSQL是连接Visual Basic程序到SQL Server的性能最好最直接的方式。VBSQL包含以下三个文件：

VBSQL.VBX：包含库函数，具有访问重要的消息和处理错误的能力

VBSQL.BI：包括所有的常量和变量说明

VBSQL.HLP：Windows帮助文件，使用VBSQL的指南

使用VBSQL时，必须将VBSQL.BI加入到Visual Basic工程文件中，并确保VB程序运行时有VBSQL.VBX文件。　　

一般的DB库API编程的过程是这样的：先通过调用SqlInit对DB库进行初始化，再调用SqlConnection打开一个连接，然后就可做一些工作。下面的代码是一个初始化DB库并登录到服务器的通用例程。

复制内容到剪贴板

代码:

　　Private Sub InitializeApplication() 
　　DBLIB_VERSION=SqlInit() 
　　If DBLIB_VERSION=""Then 
　　　MsgBox"Could not initialize DBLIB!Exit application.", MB_ICONEXCLAMATION 
　　End If 
　　End Sub　　 
　　Private Function LoginToServer() As integer 
　　loginToServer=SUCCEED 
　　Status%=SqlSetloginTime%(loginTimeOut) 
　　If giSqlConn<>0 Then 
　　SqlClose(giSqlConn) 注释：关闭已打开的连接 
　　giSqlConn=SqlOpenConnection(gsServerName, gsLoginID, gsPassword, ProgramName, ProgramName) 
　　If giSqlConn<>0 Then 
　　liresuit=SqlUse(giSqlConn,"Sales") 
　　Else 
　　LogintoServer=FAIL 
　　End If 
　　End Function

4、RDO 远程数据对象(RemoteData Objects)

要讨论RDO,就必然要谈到DAO。RDO是从DAO派生出来的,但两者很大的不同在于其数据库模式。DAO是针对[记录(Records)]和[字段( Fields)],而RDO是作为[行(Rows)]和[列(Columns)]来处理。也就是说DAO 是ISAM模式,RDO是关系模式。此外DAO是访问Access的Jet引擎(Jet是ISAM)的接口，而RDO则是访问ODBC的接口。

可见,RDO是综合了DAO/Jet、VBSQL/DBLib以及ODBC的优点的对象(Object)。需要强调的是，RDO是包裹着ODBC API的一层薄薄的外壳, 被设计成在后台(服务器端)有数据库存在的前提下运行，同时也是针对SQL Server和Oracle而特别设计的。

RDO的优势在于它完全被集成在VB之中。此外，直接访问SQL Server存储过程、完全支持T-SQL、T-SQL调试集成在开发环境中、Visual Database Tools的集成化等，也是RDO的长处。

在RDO的对象和集合中，有很多对数据库的状态和设定进行操作的属性(Property)，以及对数据库进行操作的方法(Method)。利用这些，从RDO2.0起就可以开发事件驱动的数据库应用程序。

RDO对象与VB中其他对象的概念相同。与VB用的ActiveX控件(以往称为Custom Control或OCX、VBX)相似的是,RDO也带有属性和方法；但同Spread、InputMan等普遍应用的ActiveX控件不同的是，RDO没有自己的用户界面，因而可以和VB标准的Timer控件归为同一类。当然也可以将RDO看作调用ODBC API函数，进而对后台数据库操作加以控制的对象。在RDO的属性和方法中，包含了对单个的ODBC API函数以及一连串API函数的调用。

①rdoEngine对象

最初调用RDO对象以及RDC(远程数据控件)时，自动生成rdoEngine对象的附带事件(incident)。rdoEngine用于对RDO全局属性的参数、选项进行设置，是在RDO的阶层结构内处于最上层的对象，包含了所有的其他对象。

rdoEngine对象与DAO/Jet不同，虽然被多个应用程序共享，但体现rdoEngine对象的设定值的属性却并不共用，而是在各自的应用程序的程序界面中对其分别加以设定。这些设定值对其他使用RDO以及RDC的应用程序没有任何影响。rdoEngine不是集合的要素，而是重新定义的对象，rdoEngine对象不能被追加作成对象属性的初值。

②rdoEnvironment对象

RDO对象在自动创建rdoEngine对象时，将rdoEnviroment对象的初始值生成并保存为rdoEnviroments(0)。一般情况下，应用程序中不必追加rdoEnvironment对象，大多只需对已有的rdoEnviroments(0)进行操作就可以了。只有在支持一个以上事务(Transaction)，需要将用户名和口令信息分别处理的情况下，利用rdoCreateEnvironment方法将特定的用户名和口令值做成新的rdoEnvironment对象。在这个方法中可以指定固有名、用户名和口令，如果所指定的值与rdoEnvironments集合的已经存在的成员名称相同，会产生错误。新建的rdoEnvironment对象自动追加在rdoEnvironments集合的最后。调rdoCreateEnvironment方法时，其name参数可以是长度为0的文字列，这时新的rdoEnvironment对象将不会被追加在rdoEnvironments集合之中。

③rdoConnection对象

rdoConnection对象用于同SQL Server的连接管理。

下面是与SQL Server连接的例子。

用OpenConnection方法的一个实例。

设定的DSN为MyDSN: 　

复制内容到剪贴板

代码:

Dim Cn As rdoConnection 
Dim En As rdoEnvironment 
Dim Conn As String 
Conn = "DSN = MyDSN; UID = Jacob;" & "PWD = 123456; DATA BASE = MyDb;" 
Set Cn= En.OpenConnection("", rdDriverPrompt, False, Co nn) 
Set Cn= En.OpenConnection(Prompt:= rdDriverPrompt, Rea dOnly:= False,Connect:= Cnn)

用EstablishConnection方法的一个实例。

这里以独立的rdoConnection对象为例说明与SQL Server的连接。

复制内容到剪贴板

代码:

Public WithEvents Eng As rdoEngine 
Public WithEvents Cn As rdoConnection 

Private Sub Form_Load() 
　Set Eng = New rdoEngine 
　Set Cn = New rdoConnection 
　With Cn 
　　.Connect = "UID = ; PWD = ;" & "DATABASE = pubs; DSN = biblio" 
　　.LoginTimeout = 5 
　　.EstablishConnection rdoDriverNoPromt, True, rdAsyncEna ble 
　End With 
End Sub

在这个例子中，Form_Load函数对rdoEngine和rdoConnection对象进行初始化。这里有一点需要注意，rdoConnection对象是处于独立的状态之下，即使是处于未连接状态也可以设置属性的值。接下来是rdoConnect对象的事件处理程序。从RDO 2.0起可以实现异步方式(rdAsyn cEnable)，EstablishConnection就设定为该值。在异步状态下，不必等待与数据库的连接，程序可以迅速从Form_Load 函数中退出。然后是BeforeConnect事件，该处理在与数据库的连接开始以前被激发，此时不能进行有关终止连接的操作:

复制内容到剪贴板

代码:

Private Sub Cn_BeforeConnect(ConnetString As String, Pro mpt As Variant) 
　MsgBox "正在连接" & ConnectString, vbOKOnly, "连接前" 
End Sub

连接完成之后的事件处理:

复制内容到剪贴板

代码:

Private Sub Cn_Connect(ByVal ErrorOccurred As Boolean) 
　Dim M As String 
　If ErrorOccurred Then 
　　For Each er In rdoErrors 
　　　M = M & er & vbCrLf & M 
　　Next 
　　MsgBox "连接失败" & vbCrLf & M 
　Else 
　　MsgBox "连接成功" 
　　注释：这是确认连接状态的测试代码 
　Cn.Excute "use pubs" 
End Sub

RDO连接处理结束后，在该事件中确认连接成功与否。连接成功的情况下ErrorOccurred返回False，失败时为True，由此可以对rdoErrors集合进行检测：

复制内容到剪贴板

代码:

Private Sub Eng_InfoMessage() 
　For Each er In rdoErrors 
　　Debug.Print er 
　Next 
　RdoErrors.Clear 
End Sub

不能与SQL Server连接的原因多种多样，有可能是由于对数据库的访问权限、网络连接问题、数据库表的信息错误、SQL Server同时连接的许可数、资源不足等等，具体情况需要与网络管理员商量。断开连接的操作非常简单，但又很重要，因为RDO不提供自动断开的功能。　　

Cn.Close

Set Cn = Nothing 注释：释放对象所占的内存资源

En.Close

Set En = Nothing 注释：释放对象所占的内存资源　　

VB是对象语言，Form、ActiveX控件也都是对象。使用对象后必须养成将对象设为Nothing把它从内存中释放的编程习惯。这样可以预防很多不可预测错误，往往程序中发生原因不明的错误时，其原因就在于此。

5、ADO 数据对象(Active Data Objects)

ADO是基于全新的OLE DB技术，OLE DB可对电子邮件、文本文件、复合文件、数据表等各种各样的数据通过统一的接口进行存取。随着ActiveX控件的升级(Windows 98的ActiveX 5.0)，RDO将被以ActiveX技术为基础的ADO接口所替代。下面将介绍基于ActiveX技术的ADO访问SQL Server 6.5数据库的技术和方法。基于浏览器的ADO接口常用函数如下：

(1)取当前的工作数据库

由于管理任务一般都必须在Master库中完成，因此在执行管理任务之前，最好保存当前工作库，以便完成任务之后再切换回原来的任务。　

复制内容到剪贴板

代码:

Public Function SQLGetCurrentDatabaseName(Cn As ADODB.Connection) As String 
　Dim sSQL As String 
　Dim RS As New ADODB.Recordset 
　On Error GoTo errSQLGetCurrentDatabaseName 
　sSQL="select CurrentDB=DB_NAME ( )" 
　RS.Open sSQL, Cn 
　SQLGetCurrentDatabaseName=Trim $ (RS! CurrentDB) 
　RS.Close 
　Exit Function 
　errSQLGetCurrentDatabaseName: 
　SQLGetCurrentDatabaseName=" " 
End Function

(2)取SQL Server安装目录下的DATA子目录路径

取SQL Server的设备文件缺省目录，返回如D:MSSQL DATA。

复制内容到剪贴板

代码:

Public Function SQLGetDataPath(Cn As ADODB.Connection) As String 
　Dim sSQL As String 
　Dim RS As New ADODB.Recordset 
　Dim sFullPath As String 
　On Error GoTo errSQLGetDataPath 
　sSQL="select phyname from master..sysdevices where name=注释：master注释： " 
　RS.Open sSQL, Cn 
　sFullPath = RS! phyname 
　RS.Close 
　SQLGetDataPath=Left $ (sFullPath, Len(sFullPath) -10) 注释：MASTER.DAT的大小 
　　Exit Function 
　errSQLGetDataPath: 
　SQLGetDataPath=" " 
End Function

(3)创建一个新数据库　　

复制内容到剪贴板

代码:

Public Function SQLCreateDatabase65 (Cn As ADODB.Connection,sDBName 
As String, sDataDeviceName As String, nDataSize As Integer, Optional sLogDeviceName, 
Optional nLogSize) As Boolean 

　Dim sSQL As String 
　On Error GoTo errSQLCreateDatabase65 
　Dim sDB As String 
　sDB =SQLGetCurrentDatabaseName(Cn) 
　sSQL = "USE master" 
　Cn.Execute sSQL 
　sSQL ="CREATE DATABASE" & sDBName 
　sSQL = sSQL &" ON " & sDataDeviceName & "=" & nDataSize 
　If Not IsMissing(sLogDeviceName) And Not IsMissing(nLogSize) Then 
　　sSQL = sSQL & "LOG ON" & sLogDeviceName & "="& nLogSize 
　End If 
　Cn.Execute sSQL 
　sSQL = "USE" & sDB 
　Cn.Execute sSQL 
　SQLCreateDatabase65 = True 
　Exit Function 
　errSQLCreateDatabase65: 
　On Error Resume Next 
　sSQL = "USE " & sDB 
　Cn.Execute sSQL 
　SQLCreateDatabase65 = False 
End Function

(4)判断一个数据库是否存在

复制内容到剪贴板

代码:

Public Function SQLExistDatabase(Cn As ADODB.Connection, sDBName As String) As Boolean 
　Dim sSQL As String 
　Dim RS As New ADODB.Recordset 
　Dim bTmp As Boolean 
　on Error GoTo errSQLExistDatabase 
　sSQL = "select CntDB = count ( * ) " 
　sSQL = sSQL & "From master.dbo.sysdatabases" 
　sSQL = sSQL & "Where name = 注释： "& sDBName & " 注释： " 
　RS.Open sSQL, Cn 
　If RS! CntDB = 0 Then bTmp = False Else bTmp = True 
　　RS.Close 
　　SQLExistDatabase = bTmp 
　　Exit Function 
　　errSQLExistDatabase: 
　　SQLExistDatabase = False 
　　Exit Function 
　End Function

(5)删除一个数据库　　

复制内容到剪贴板

代码:

Public Function SQLDropDatabase (Cn As ADODB.Connection, sDBName As String) As Boolean 
　Dim sSQL As String 
　On Error GoTo errSQLDropDatabase 
　If Not SQLExistDatabase(Cn, sDBName) Then 
　　SQLDropDatabase = True 
　　 Exit Function 
　End If 
　Dim sDB As String 
　sDB = SQLGetCurrentDatabaseName(Cn) 
　sSQL = "Use master" 
　Cn.Execute sSQL 
　sSQL = "DROP DATABASE " & sDBName 
　Cn.Execute sSQL 
　sSQL = "USE " & sDB 
　Cn.Execute sSQL 
　SQLDropDatabase = True 
　Exit Function 
errSQLDropDatabase: 
　On Error Resume Next 
　sSQL = "USE " & sDB 
　Cn.Execute sSQL 
　SQLDropDatabase = False 
End Function

三、性能比较及应用说明

用VB开发基于SQL Server的数据库系统，以上几种访问SQL Server的方法各有各的特点。DAOs方法是基于对象的，因而便于使用，但是它是从Visual Basic到SQL Server最慢的连接方式。ODBC API和VBSQL方法从本质上讲是基于程序的。ODBC API方法通用性好，允许最强的互操作性，编程简单，但速度慢于VBSQL方法。VBSQL方法通过VBSQL控件，提供了重要的SQL Server前端应用程序所需的灵活性、强大功能和良好性能。它具有真正的事件驱动及错误处理能力，完全支持异步处理、游标和计算列等。这些都是VBSQL方法超出其它方法的优势，但其编程稍复杂。RDO是位于ODBC API之上的一个对象模型层，它依赖ODBC API、ODBC驱动程序以及后端数据库引擎来实现，用RDO所需的程序短小(约250 KB)、快速。RDO具备基本的ODBC处理方法，可直接执行大多数ODBC API函数，RDO包含在VB 4.0/VB 5.0企业版中，由MSRDO32.DLL动态连接库来实现。RDO是综合了DAO/Jet、VBSQL/DBLib和ODBC的优点的对象模型，包含ODBC API应用层，设计为在后台(服务器端)有数据库存在的前提下运行，是针对SQL Server和Oracle而特别设计的。RDO的优势在于它完全被集成在VB之中，可直接访问SQL Server存储过程、完全支持T-SQL、T-SQL调试集成在开发环境中、Visual Database Tools的集成化等。但微软已宣布今后不再对VBSQL/DBLib进行升级，而ODBC API函数一般的编程方式也不为人们所喜爱，RDO的应用将逐渐减少。至于实际使用哪一种接口方式，在很大程度上依赖于用户的应用程序的具体情况而定。　　

四、VisualBasic访问数据库的前景

近来随着Web应用软件的迅速发展和现有数据存储形式的多种多样，Visual Basic访问数据库的解决方案面临诸如快速提取分布于企业内部和外部有用商业信息等的多种挑战。为此Microsoft提出一种新的数据库访问策略，即“统一数据访问”（UniversalDataAccess）的策略。“统一数据访问”提供了高性能的存取包括关系型和非关系型在内的多种数据源，提供独立于开发工具和开发语言的简单的编程接口，这些技术使得企业集成多种数据源、选择更好的开发工具、应用软件、操作平台、建立容易维护的解决方案成为可能。

“统一数据访问”的基础是Microsoft的数据访问组件。这些组件包括ActiveXDataObjects(ADO)、RemoteDataService(RDS，也称“高级数据连接器或”ADC)、OLEDB和ODBC。

查看全文
如若内容造成侵权/违法违规/事实不符，请联系编程学习网邮箱：809451989@qq.com进行投诉反馈，一经查实，立即删除！

static修饰的函数作用与意义
static修饰的函数叫做静态函数，静态函数有两种，根据其出现的地方来分类：如果这个静态函数出现在类里，那么它是一个静态成员函数；静态成员函数的作用在于：调用这个函数不会访问或者修改任何对象（非static）数据成员。其实很好理解，类的静态成员(变量和方…...
2024/4/24 23:21:40
[Android官方Demo系列] View间渐变
简介：View间渐变效果图：代码分析：getResources().getInteger(android.R.integer.config_shortAnimTime);获取动画时间：200 msprivate Class<? extends Activity> activityclass; 活动的变量定义/*alpha值取0%，则为纯透明。alpha值取100%，则为不透明。*/showView.…...
2024/4/24 23:21:39
Qt实战之开发CSDN下载助手（1）
这次实战，我们需要开发一款CSDN下载助手。它具备以下功能: 1) . 能够正常登录CSDN账户 2) . 能够根据用户提供的资源下载页面地址解析出真实地址 ( 当然啦，你的账号积分要足够下载所需要积分) 3) . 能够在下载完毕后评价资源，然后获得返还积分。 4) . 相信你已经猜到了隐含…...
2024/4/24 23:21:41
electron桌面应用打开webview的方法
const windowOptions = {title: demo,// titleBarStyle: hidden,width: 1440,height: 900,webPreferences: {devTools: true, //可禁用devTools:false,nodeIntegration: true,contextIsolation: true, //上下文隔离preload: path.join(__dirname, ./utils/preload.js), // webv…...
2024/4/24 23:21:44
Hibernate annotation
@OneToOne 单向一对一模型@OneToOne 一对一 @JoinColumn用来指定生成的外键名字例如：@JoinColumn(name="user_Id") @OneToOne注释指明实体A 与实体B 为一对一关系，@OneToOne注释六个属性：targetEntity、cascade、fetch、optional、orphanRemoval和mappedBy。 fe…...
2024/4/24 23:21:36
另外的方法，得到drawable目录下的图片的ＩＤ
flag.png 為例，可以用： int idFlag = getResources().getIdentifier( getPackageName() + ":drawable/flag", null, null); // 或是 int idFlag = getResources().getIdentifier( "flag", "drawable", getPackageName()); int …...
2024/5/3 23:07:46
全能电子地图下载器破解版亲测可用
『全能地图下载器』是一款地图、高程下载类GIS软件，支持将下载的地图、高程等数据进行多种专业格式转换，或发布为地图服务，旨在辅助用户提高工作效率，轻松构建自己的地图应用。可应用于学术科研、工程、规划、设计等工作，在测绘、地质、交通、电力、水利、农业、林业和旅游…...
2024/4/24 23:21:35
局部对象，static局部对象，static全局对象
为分清这些，我们先看一段代码：#include<iostream> static int global_sta = 1; //global_sta为静态全局对象 void print() {int non_local = 2; //non_local为局部对象，非静态的static sta_local = 3; //sta_local为静态局部对象 }非静态局部对象特点：在定义…...
2024/4/24 23:21:33
理解SQL原理，写出高效的SQL语句
转自 http://www.nowamagic.net/librarys/veda/detail/1502/我们做软件开发的，大部分人都离不开跟数据库打交道，特别是erp开发的，跟数据库打交道更是频繁，存储过程动不动就是上千行，如果数据量大，人员流动大，那么我们还能保证下一段时间系统还能流畅的运行吗？我们还能保…...
2024/4/14 21:13:53
使用太乐地图下载器下载百度地图切片
使用太乐地图下载器下载百度地图切片下载环境电脑为wind10，太乐地图下载器4.6版下载步骤 1.打开软件，点击打开地图下载工具 2.点击主菜单，选择百度地图-百度街道地图（要下载其他地图切片可按分类选择下载）； 3.地图下载-选择行政区划下载-选择需要的行政区，地图中红…...
2024/4/14 21:13:53
Android用getIdentifier方法获取资源ID
getIdentifier()是Resources类下的一个方法，具体获取id如下：ImageView mImageView=(ImageView)findViewById(R.id.iv);int id = getResources().getIdentifier("ic_launcher", "drawable", "com.example.drawviewdemo");mImageView.setBackgro…...
2024/4/20 8:02:34
electron原来这么简单----打包你的react、VUE桌面应用程序
也许你不甘心只写网页，被人叫做“他会写网页”，也许你有项目需求，必须写桌面应用，然而你只会前端，没关系。网上的教程很多，但是很少有能说的浅显易懂的，我尽力将electron打包应用说的清晰明了，希望能你在写自己的应用的时候，感到心中有数。话不多说，进入正题：一、安…...
2024/4/14 21:13:50
业务关系（采购订单）处理
一.组合关系组合就是强聚合，聚合就是双向的多对一，一对多强:最强级联一方放弃关系维护单据都会用到组合关系保存的时候双方都能找到对象//一方的配置 /**cascade = CascadeType.ALL:包含所有级联(增删改)orphanRemoval = true:单方删除mappedBy = "bill"：放弃关…...
2024/4/14 21:13:49
linux驱动中使用static关键字的重要性
linux内核十分宠大，代码量超过百万行。对于C语言的函数和全局变量的作用空间都是全局的，在另外一个文件中，使用extern关键字就可以实现对于其他文件中的全局变量和函数的访问。因此，一旦源码中函数名称定义相同，就会出现编译出错。因此，需要引入一些封装的特性，限制源码…...
2024/4/14 21:13:48
SQL存储过程恢复与删除收集
Error Message:未能找到存储过程 master..xp_cmdshell。修复法：很通用的，其实碰到其他126 127的都可以一起修复，除了xplog70.dll其他的都可以用这命令修复 xp_cmdshell新的恢复办法第一步先删除：drop procedure sp_addextendedproc drop procedure sp_oacreate exec sp…...
2024/4/20 4:00:35
weblogic下开发hibernate发生jar包冲突问题
在weblogic下部署应用时，发生错误：java.lang.NoSuchMethodError:javax.persistence.OneToMany.orphanRemoval()Z 。上述问题在于Hibernate的包冲突。找到weblogic的安装目录中的modules目录，C:\Oracle\Middleware\modules，里面有两个jar包：javax.persistence_1.0.0.0_1-0-…...
2024/4/14 21:13:46
Electron学习开发之（2）--官方指南文档
请确认你所使用的文档与你的 Electron 版本匹配。你可以在页面的 URL 中找到对应的版本号。如果没有，你可能正在使用开发版本分支里的文档，这个分支可能包含了一些与你的 Electron 版本不兼容的 API。如果想要访问旧版本的文档，你可以浏览标签：通过在GitHub 中打开下拉…...
2024/4/24 23:21:32
C++之static—类不需实例化就能用？
一般情况下，需要用到某个类的时候，都必须先实例化这个类，才能对其进行调用。在编程过程中发现，有些类不用实例化就可以直接拿来使用，使用它的字段、方法等等。这时候，靠的就是static作用。static英文意思为“静止的，静态的”，在OOP中可以作为修饰符，类、字段、属性、方…...
2024/4/24 23:21:34
新版 CSDN Markdown 编辑器上线公告（Alpha 2.0）
感谢大家一直支持 CSDN Markdown 编辑器，每一次改动和优化，都是努力让你的写作体验变得更好。这次我们更新了以下内容：我们重构了 MD 编辑器代码，比起以前更稳定，速度也更快；增加了保存功能；支持图片拖拽上传；支持剪贴板上传图片（Windows 暂不支持）；优化了摘要…...
2024/4/24 23:21:32
从resource中的raw文件夹中获取文件并读取数据（资源文件只能读不能写）
转载：http://blog.sina.com.cn/s/blog_4d25c9870100qpax.html一、从resource中的raw文件夹中获取文件并读取数据（资源文件只能读不能写）String res = ""; try{ InputStream in = getResources().openRawResource(R.raw.bbi); //在\Test\res\raw\bbi.txt,in…...
2024/4/24 23:21:29

用VB访问SQL Server数据库技术详解

代码:

代码:

代码:

代码:

代码:

代码:

代码:

代码:

代码:

代码:

代码:

代码:

代码:

相关文章

最新文章