Jump to content
Fórum Script Brasil
  • 0
Sign in to follow this  
daniel.itow

Conexao Com Banco De Dados

Question

Oi pessoal, td na trankilidade ? Estou querendo me conctar a um banco de dados em SQL mas não estou conseguindo de jeito nenhum, Estou utilizando a linha de comando abaixo:

No form1 eu coloquei:

Private Sub Command1_Click()

Text1.Text = TESTANDO

End Sub

E no Modulo eu coloquei:

Public Type TESTANDO

Con As New ADODB.Connection

RSteste As New ADODB.Recordset

End Type

Public Type OPTTESTANDO

Data As TESTANDO

End Type

Public OPTTESTANDO As TESTANDO

Sub MAIN()

With TESTANDO

.Data.Con.CursorLocation = adUseClient

.Data.Con.Open "DRIVER={SQL Server};SERVER=servidorbd;DATABASE=teste;Trusted_Connection=Yes;"

.Data.RSteste.Open "SELECT * FROM test"

Form1.Show

End With

End Sub

---

Se alguém puder me dar uma ajuda em como me conectar com o banco, por favor, me ajude. Obrigado

Obs.: No form1 existe uma textbox nomeada Text1 e um botao

B)

Share this post


Link to post
Share on other sites

2 answers to this question

Recommended Posts

  • 0
Guest - PiGmEu -

a string de conexao com o SQL Server é a seguinte:

cnn.ConnectionString = "Provider=SQLOLEDB; Data Source = \Servidor\instancia; Initial Catalog=banco_de_dados; User ID=Usuario; Password=senha"

cnn.open

Abracos

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this  



  • Forum Statistics

    • Total Topics
      148499
    • Total Posts
      644190
×
×
  • Create New...