CONEXAO COM BD EM VB5
[txt-size=1]Alguem sabe como me conectar ao mysql, postgresql, oracle ou sql server com o vb 5?[/txt-size]
Cara..
Adiciona a Referencia para o ADO
Abaixo segue alguns trechos de código
Dim db as New ADODB.Connection
'MyODBC 2.50 Local database
db.Open "Driver={mySQL};Server=localhost;Option=16834;Database=myDataBase;"
'MyODBC 3.51 Local database
db.Open "Driver={MySQL ODBC 3.51 Driver};Server=localhost;Database=myDataBase; User=myUsername;Password=myPassword;Option=3;"
'PostgreSQL ODBC driver
db.Open "Driver={PostgreSQL};Server=IP address;Port=5432;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
'PostgreSQL ANSI
db.Open "Driver={PostgreSQL ANSI};Server=IP address;Port=5432;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
'Oracle - Versões antigas
db.Open "Driver={Microsoft ODBC for Oracle};Server=myServerAddress;Uid=myUsername;Pwd=myPassword;"
'Oracle - Versões Novas
db.Open "Driver={Microsoft ODBC Driver for Oracle};ConnectString=OracleServer.world;Uid=myUsername;Pwd=myPassword;"
'SQLSERVER
'Oracle - Versões antigas
db.Open "Driver={Microsoft ODBC for Oracle};Server=myServerAddress;Uid=myUsername;Pwd=myPassword;"
'Oracle - Versões Novas
db.Open "Driver={SQL Server};Server=myServerAddress;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
Ve se isso te ajuda.
Já é um começo
Adiciona a Referencia para o ADO
Abaixo segue alguns trechos de código
Dim db as New ADODB.Connection
'MyODBC 2.50 Local database
db.Open "Driver={mySQL};Server=localhost;Option=16834;Database=myDataBase;"
'MyODBC 3.51 Local database
db.Open "Driver={MySQL ODBC 3.51 Driver};Server=localhost;Database=myDataBase; User=myUsername;Password=myPassword;Option=3;"
'PostgreSQL ODBC driver
db.Open "Driver={PostgreSQL};Server=IP address;Port=5432;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
'PostgreSQL ANSI
db.Open "Driver={PostgreSQL ANSI};Server=IP address;Port=5432;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
'Oracle - Versões antigas
db.Open "Driver={Microsoft ODBC for Oracle};Server=myServerAddress;Uid=myUsername;Pwd=myPassword;"
'Oracle - Versões Novas
db.Open "Driver={Microsoft ODBC Driver for Oracle};ConnectString=OracleServer.world;Uid=myUsername;Pwd=myPassword;"
'SQLSERVER
'Oracle - Versões antigas
db.Open "Driver={Microsoft ODBC for Oracle};Server=myServerAddress;Uid=myUsername;Pwd=myPassword;"
'Oracle - Versões Novas
db.Open "Driver={SQL Server};Server=myServerAddress;Database=myDataBase;Uid=myUsername;Pwd=myPassword;"
Ve se isso te ajuda.
Já é um começo
Tópico encerrado , respostas não são mais permitidas