none
Errores VS2012 Express RRS feed

  • Pregunta

  • el codigo va asi

    Imports System.Data.OleDb

    Public Class Form1
        Private cadenaConexion As String = _
        "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Airport Sentinel.accdb"

        Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
            Home.Show()
            Me.Close()
        End Sub

        Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
            'TODO: esta línea de código carga datos en la tabla 'Airport_SentinelDataSet.Carretilla' Puede moverla o quitarla según sea necesario.
            Me.CarretillaTableAdapter.Fill(Me.Airport_SentinelDataSet.Carretilla)

        End Sub

        Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
            Form2.Show()
            Me.Close()
        End Sub

        Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            Try
                ' Rellenamos el control DataGridView 
                DataGridView1.DataSource = ObtenerCarretillaPorCodigo(TextBox1.Text)

            Catch ex As Exception
                ' Se ha producido un error. 
                MessageBox.Show("Ha ocurrido un error porfavor consulte el manual de usuario anexo para más detalles", _
                "047D0B00758", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            End Try
        End Sub
        private Sub ObtenerCarretillaPorCodigo(ByVal Codigo As String) As DataTable

            If (String.IsNullOrEmpty(Codigo)) Then
                Return Nothing
            End If


            Using cnn As New OleDbConnection(cadenaConexion)

                Dim cmd As OleDbCommand = cnn.CreateCommand()
                cmd.CommandText = "SELECT * FROM Carretilla WHERE Codigo like @CarretillaCodigo"
                cmd.Parameters.AddWithValue("@CarretillaCodigo", Codigo)

                Dim da As New OleDbDataAdapter(cmd)
                Dim dt As New DataTable("Codigo")
                da.Fill(dt)

                Return dt

            End Using
        End Sub
    End Class

    pero tengo estos errores:

    espero que me ayuden

    salu2

    lunes, 2 de septiembre de 2013 20:41

Respuestas

  • la pregunta se relaciona con

    http://social.msdn.microsoft.com/Forums/es-ES/3b336f0b-587a-47a5-84e6-43e4e5783198/problemas-con-vs2012-express

    recuerda no abrir una nueva pregunta sino cerraste la anterior que trata el mismo tema

    saludos


    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina

    • Marcado como respuesta KWES-Link miércoles, 4 de septiembre de 2013 22:59
    lunes, 2 de septiembre de 2013 20:59

Todas las respuestas

  • y el codigo es para un formulario de busqueda
    lunes, 2 de septiembre de 2013 20:42
  • hola

    si realizas un doble click en la lista de errores, en cada item donde marca el problema ?

    o sea donde te lleva en el codigo al hacer doble click en cada error en la "lista de errores"


    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina

    lunes, 2 de septiembre de 2013 20:58
  • la pregunta se relaciona con

    http://social.msdn.microsoft.com/Forums/es-ES/3b336f0b-587a-47a5-84e6-43e4e5783198/problemas-con-vs2012-express

    recuerda no abrir una nueva pregunta sino cerraste la anterior que trata el mismo tema

    saludos


    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina

    • Marcado como respuesta KWES-Link miércoles, 4 de septiembre de 2013 22:59
    lunes, 2 de septiembre de 2013 20:59