Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Tutorial documentacion o ejemplos

Estas en el tema de Tutorial documentacion o ejemplos en el foro de Visual Basic clásico en Foros del Web. Que tal alguien podría facilitarme un tutorial o algun lugar donde vengan ejemplos de como insertar en MS SQL SERVER 2005 DESDE VISUAL BASIC 2003, ...
  #1 (permalink)  
Antiguo 02/06/2008, 09:06
Avatar de Monimo  
Fecha de Ingreso: noviembre-2007
Ubicación: Mexico Df
Mensajes: 742
Antigüedad: 16 años, 5 meses
Puntos: 69
Tutorial documentacion o ejemplos

Que tal alguien podría facilitarme un tutorial o algun lugar donde vengan ejemplos de como insertar en MS SQL SERVER 2005 DESDE VISUAL BASIC 2003, he estado haciendo una aplicacion que me inserta solo la primera vez y lo demas no lo inserta creo que se debe alos tipos de datos y todo eso pero no sé bien ademas quiza me este complicando pues estoy usando para insertar algo como esto :

Código:
insertCmd = "insert into agentes values (@Usuario_red, @nom, @APP," _
            & "@APM);"
            myCommand = New Data.SqlClient.SqlCommand(insertCmd, odbCnn)
        myCommand.Parameters.Add(New Data.SqlClient.SqlParameter("@Usuario_red", _
                      SqlDbType.VarChar, 11))
            myCommand.Parameters("@Usuario_red").Value = user
y quisiera saber si existe una forma mas fácil de antemano gracias
  #2 (permalink)  
Antiguo 02/06/2008, 09:17
Avatar de Monimo  
Fecha de Ingreso: noviembre-2007
Ubicación: Mexico Df
Mensajes: 742
Antigüedad: 16 años, 5 meses
Puntos: 69
Respuesta: Tutorial documentacion o ejemplos

Mi problema esuqe esto lo hace perfecto:


insertCmd = "insert into agentes values (@Usuario_red, @nom, @APP," _
& "@APM);"
myCommand = New Data.SqlClient.SqlCommand(insertCmd, odbCnn)
myCommand.Parameters.Add(New Data.SqlClient.SqlParameter("@Usuario_red", _
SqlDbType.VarChar, 11))
myCommand.Parameters("@Usuario_red").Value = user
myCommand.Parameters.Add(New Data.SqlClient.SqlParameter("@nom", _
SqlDbType.VarChar, 40))
myCommand.Parameters("@nom").Value = consulta(user, "nom")
myCommand.Parameters.Add(New Data.SqlClient.SqlParameter("@APP", _
SqlDbType.VarChar, 20))
myCommand.Parameters("@APP").Value = consulta(user, "app")
myCommand.Parameters.Add(New Data.SqlClient.SqlParameter("@APM", _
SqlDbType.Char, 12))
myCommand.Parameters("@APM").Value = consulta(user, "apm")
MsgBox(asunto & mensaje & fecha & address)
Try
myCommand.ExecuteNonQuery()
MsgBox("Registrado correctamente")
Catch ex As SqlClient.SqlException
myCommand.Connection.Close()
End Try


pero si kiero insertar esto por ejemplo:

insertCmd3 = "insert into detalles values ( @asunto, @mensaje, @fecha," _
& "@direccion);"
detalless = New Data.SqlClient.SqlCommand(insertCmd3, odbCnn)
detalless.Parameters.Add(New Data.SqlClient.SqlParameter("@id_mail", _
SqlDbType.Int, 40))
detalless.Parameters("@id_mail").Value = "1"
detalless.Parameters.Add(New Data.SqlClient.SqlParameter("@asunto", _
SqlDbType.VarChar, 100))
detalless.Parameters("@asunto").Value = asunto
detalless.Parameters.Add(New Data.SqlClient.SqlParameter("@mensaje", _
SqlDbType.Text))
detalless.Parameters("@mensaje").Value = mensaje
detalless.Parameters.Add(New Data.SqlClient.SqlParameter("@fecha", _
SqlDbType.DateTime))
detalless.Parameters("@fecha").Value = fecha
detalless.Parameters.Add(New Data.SqlClient.SqlParameter("@direccion", _
SqlDbType.VarChar, 56))
detalless.Parameters("@direccion").Value = address




no lo hace!!! porkeee??
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 09:54.