1. Comment VB se connecte-t-il à la base de données du répertoire courant ?
En VB, vous devez généralement utiliser des chemins relatifs pour vous connecter à la base de données dans le répertoire courant. Voici les étapes de base pour vous connecter à la base de données du répertoire actuel :
Déterminez l'emplacement du fichier de base de données :
.mdb
ou un . accdb
file ) se trouve dans le répertoire courant de l'application VB. .mdb
或.accdb
文件)位于VB应用程序的当前目录中。使用ADO连接字符串:
Dim conn As Object Set conn = CreateObject("ADODB.Connection") conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & App.Path & "\YourDatabase.accdb"
App.Path
表示当前执行文件所在的目录,YourDatabase.accdb
是你的数据库文件名。二、VB6.0与SQL连接的相关设置说下好了?
连接VB6.0与SQL Server数据库涉及到设置ADO连接。以下是一般的设置步骤:
添加引用:
使用ADO连接字符串:
Dim conn As Object Set conn = CreateObject("ADODB.Connection") conn.Open "Provider=SQLOLEDB;Data Source=YourServer;Initial Catalog=YourDatabase;User ID=YourUsername;Password=YourPassword;"
YourServer
是SQL Server实例名,YourDatabase
是数据库名称,YourUsername
和YourPassword
Utilisez la chaîne de connexion ADO :
Utilisez la chaîne de connexion ADO (ActiveX Data Objects) pour spécifier le chemin de la base de données dans le code VB. L'exemple de code est le suivant :
Dim rs As Object Set rs = CreateObject("ADODB.Recordset") rs.Open "SELECT * FROM YourTable", conn Do While Not rs.EOF ' 处理查询结果 rs.MoveNext Loop rs.Close
YourDatabase.accdb
est le nom de votre fichier de base de données. La connexion de la base de données VB6.0 et SQL Server implique la configuration de la connexion ADO. Voici les étapes de configuration générales :
Ajouter une référence :
conn.Execute "UPDATE YourTable SET Column1='NewValue' WHERE Condition"
Dans le code ci-dessus, VotreServeur<. /code> est le nom de l'instance SQL Server, <code>YourDatabase
est le nom de la base de données, YourUsername
et YourPassword
sont les informations de connexion à la base de données.
Dim cmd As Object Set cmd = CreateObject("ADODB.Command") cmd.ActiveConnection = conn cmd.CommandType = adCmdStoredProc cmd.CommandText = "YourStoredProcedure" cmd.Execute
Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!