mysql com banco de dados em provedor na internet


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: mysql com banco de dados em provedor na internet

janaina
não registrado

Postada em 25/04/2008 18:11 hs

Ola gostaria de saber se alguém tem um projeto (ou exemplo simples de conexao, inclusao, alteraçao, consulta e exclusao) de um banco de dados na internet.
Preciso muito disso.
Grata
Janaina

João Carlos jr.

RIBEIRÃO PRETO
SP - BRASIL

Postada em 25/04/2008 18:28 hs

Janaina o processo é o mesmo que eu te passei no link do post anterior seu, a unica coisa que muda é a conexão com o banco de dados, para ver as strings de conexão com o banco de dados entre nesse link: http://www.connectionstrings.com/?carrier=mysql

Espero ter lhe ajudado

T+

João Carlos Junior

Administrador de Redes - Windows 2003 Srv, Linux

Desenvolvedor Visual Basic 6.0 com Access, SQL Server, VB .Net e Crystal Reports X

Iniciante em C# e ASP .NET

vincity

CARDOSO
SP - BRASIL

ENUNCIADA !

Postada em 26/04/2008 07:44 hs

[VB 2008]
Private Sub PictureBox12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox12.Click
        If Not conn Is Nothing Then conn.Close()
        Dim connStr As String
        connStr = String.Format("server={0};user id={1}; password={2}; database=mysql; pooling=false", _
  "localhost", "LOGIN", "SENHA")

        Try
            conn = New MySqlConnection(connStr)
            conn.Open()
            conn.ChangeDatabase("slavehack")
            data = New DataTable

            da = New MySqlDataAdapter("SELECT servidor , versao  FROM IP2  where tipo = 'VSpam'", conn)

            cb = New MySqlCommandBuilder(da)

            da.Fill(data)

            SpoilerGrid.DataSource = data
            cmdTXTResult.Text = ("Exibindo lista de .VSpam")
            cmdTXTResult.Visible = True

        Catch ex As MySqlException
            MessageBox.Show("Error connecting to the server: " + ex.Message)
        End Try
    End Sub
[/VB 2008]

Utilizo esse code para exibir resultados quando se clica em imagems..
uso um data grid para ser exibido..
muito facil de entender.
Funciona perfeitamente na internet.
apenas mudando o localhost.
Falando isso pois na versao atual estou usando um script parecido para um update

TÓPICO EDITADO

wadson
não registrado

Postada em 11/07/2008 17:36 hs

     Dim cn As Object
    Dim rs As Object

    Set cn = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.Recordset")

'ou
    'Dim cn As ADODB.Connection
    'Dim rs As ADODB.Recordset

    'Set cn = New ADODB.Connection
    'Set rs = New ADODB.Recordset

cn.Open "Provider=MS Remote;Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
'"Remote Server=http://www.xxxxxx.com.br;" & _
'"Data Source=e:domainsxxxxxx.com.bromebd.mdb"

'rs.CursorLocation = adUseClient
rs.Open "SELECT * FROM pedido", cn

wadson
não registrado

Postada em 11/07/2008 17:43 hs

Desculpe, Janaina nao li Mysql.

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR