Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.

Mensajes - Masterpy

Páginas: [1]

C, C++, C#, Java, Visual Basic, HTML, PHP, CSS, Javascript, Ajax, Joomla, MySql y más / Re:System.Data.OleDb.OleDBException: No coinciden los tipos de datos en la expresió

« en: 10 de Octubre 2016, 01:52 »

Muchas gracias por la respuesta. Voy a seguir investigando.

C, C++, C#, Java, Visual Basic, HTML, PHP, CSS, Javascript, Ajax, Joomla, MySql y más / Re:Error en Visual Basic

« en: 27 de Septiembre 2016, 23:33 »

Este es mi código

De mi Form 1

Código: [Seleccionar]

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        conectarse()


    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim id As String
        id = TextBox1.Text
        consultar(id)

    End Sub
End Class

De mi modulo

Código: [Seleccionar]

New OleDb.OleDbCommand
    Public dr As OleDb.OleDbDataReader



    Public Sub conectarse()

        Try
            conn.Open()
            MsgBox("Conexion Exitosa")
        Catch ex As Exception
            MsgBox(ex.ToString)

        End Try


    End Sub

    Public Sub consultar(ByRef identificacion As String)
        cmd.Connection = conn
        cmd.CommandType = CommandType.Text

        If identificacion <> "" Then
            cmd.CommandText = "SELECT NOMBRES, APELLIDOS, CORREO, DIRECCION FROM PERSONA WHERE IDPERSONA=" + identificacion
        Else
            cmd.CommandText = "SELECT NOMBRES, APELLIDOS, CORREO, DIRECCION FROM PERSONA "
        End If

        Try
            dr = cmd.ExecuteReader()

            If dr.HasRows Then
                While dr.Read()
                    MsgBox(dr(0).ToString + " " + dr(1).ToString + " " + dr(2).ToString + " " + dr(3).ToString)

                End While
            Else
                MsgBox("No existen registros para la consulta")

            End If

            dr.Close()

        Catch ex As Exception
            MsgBox(ex.ToString)


        End Try
    End Sub
End Module

C, C++, C#, Java, Visual Basic, HTML, PHP, CSS, Javascript, Ajax, Joomla, MySql y más / System.Data.OleDb.OleDBException: No coinciden los tipos de datos en la expresió

« en: 27 de Septiembre 2016, 23:30 »

Buenas colegas, me presento: Soy estudiante de Ingeniería en Sistemas Informáticos. Soy principiante en programación y estoy llevando la Materia de Visual Basic, y la verdad no sé como resolver este error:

System.Data.OleDb.OleDBException: No coinciden los tipos de datos en la expresión de criterios

. Les agradecería un montón si me pueden ayudar.

Páginas: [1]

Foros aprenderaprogramar.com
Didáctica y divulgación de la programación

Noticias: