No VB6, você pode acessar bancos de dados como o Access , SQL Server e MySQL . O acesso tem sido os bancos de dados mais utilizados para aplicações de banco de dados VB6. No entanto, para aplicações mais complexas , os desenvolvedores precisam utilizar Microsoft Desktop Storage Engine , que oferece a funcionalidade do SQL Server e confiabilidade. Com a técnica MSDE , você pode conectar e utilizar dados no SQL Server Express de VB6. Instruções
1
Clique em " Iniciar", " Todos os Programas " e " Visual Basic ". Clique em "Arquivo " "New" e "New Project " para criar um novo projeto. Digite um nome para o projeto. Clique em "Procurar " para especificar um local para os arquivos do projeto.
2
Clique em " Consulta " e selecione " MSHFlexGrid . " Adicione o MSHFlexGrid para " Form1 ", clicando na área em branco em " Form1 "
3
duplo clique no MSHFlexGrid e insira o seguinte código: .
Dim sql_cn Como ADODB . Conexão
Definir sql_cn = New Connection
sql_cn.ConnectionString = "Provider = SQLNCLI.1 ; Integrated Security = SSPI ; " & _
" Manter informações de segurança = False , "& _
" AttachDBFileName = "& App.Path &" \\ northwnd.mdf ; Data Source = server1 \\ sqlexpress "banco de dados
sql_cn.Open
Um ADO conexão sql_cn está configurado com o código. Esta ligação irá se conectar ao banco de dados e northwnd.mdf o motor de banco de dados é o SQL Server Express.
4
Definir o conjunto de registros para a conexão. Especifique tabela de dados "ordens" como a fonte de dados para o MSHFlexGrid via o seguinte código: Dim
sql_rs Como Recordset
Definir sql_rs = New Recordset
sql_rs.Open "Selecionar * a partir de ordens " , sql_cn
Set MSHFlexGrid1.DataSource = sql_rs
