elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


  Mostrar Temas
Páginas: [1]
1  Programación / Programación Visual Basic / editar desde un listview en: 10 Noviembre 2008, 16:00 pm
hola tengo en mi programa un listview en donde pincho sobre un item y le doy Enter (del teclado)
y los datos me los muestra en sus respectivos text...pero me surgio un problema...
ejemplo:
ingreso 2 datos...con codigo, pres y med.
el primer dato me lo edita bien...pero al tratar de editar el segundo dato me muesta solo el codigo y el resto son los datos del primer registro... y no se q hacer espero me puedan ayudar porfavor...
les dejo mi codigo
Saludos y muchas gracias de antemano.

Private Sub ListView1_keypress(keyascii As Integer)
If keyascii = 13 Then
Text1.Text = ListView1.SelectedItem
Set baseTB = OpenDatabase(App.Path & "\base de datos\bd1.mdb")
Set regTB = baseTB.OpenRecordset("SELECT * FROM farmacos WHERE Codigo =" & Text1.Text, dbOpenDynaset)
If regTB.RecordCount = 0 Then
MsgBox "no existe"
Commandgrabar.Enabled = True
Text1.SetFocus
Else
Commandeliminar.Enabled = True
Commandactualizar.Enabled = True
Text2.Text = regTB!fecha
Text3.Text = regTB!guia
Text4.Text = regTB!proveedor
Text5.Text = regTB!cantidad
Text6.Text = regTB!devolucion
Text7.Text = regTB!presentacion
Text8.Text = regTB!medicamento
Text9.Text = regTB!farmacia
Text10.Text = regTB!trapi
Text11.Text = regTB!vivanco
Text12.Text = regTB!crucero
Text13.Text = regTB!cayurruca
Text14.Text = regTB!mantilhue
Text15.Text = regTB!futahuente
Text16.Text = regTB!carimallin
Text17.Text = regTB!sector1
Text18.Text = regTB!sector2
Text19.Text = regTB!sector3
Text20.Text = regTB!procedimiento
Text21.Text = regTB!clinicasdentales1
Text22.Text = regTB!clinicasdentales2
Text23.Text = regTB!clinicasdentales3
Text24.Text = regTB!clinicasdentales4
Text25.Text = regTB!ira
Text26.Text = regTB!era
Text27.Text = regTB!salamotora
Text28.Text = regTB!prestamos
Text29.Text = regTB!saldo
End If
End If
End Sub

 :-(
2  Programación / Programación Visual Basic / eliminar de una base de datos desde un listview en: 29 Octubre 2008, 15:02 pm
hola necesito de su ayuda con lo sgte:
estoy usando visual basic 6.0 con conexion Dao
lo que quiero es que yo al seleccionar una fila en el listview este me borre el dato en la BD... no lo he logrado hacer...porque el codigo q tengo solo me limpia el listview y no me borra los datos...

espero me puedan ayudar
ahhh otra cosita... si me pudieran ayudar en esto =
tengo en mi programa un listview en donde muestro mis datos, y estoy tratando que me edite los datos ya introducidos...selecciono una fila en el listview y le doy Enter y me aparecen los datos en sus respectivos campos...pero cuando quiero editar por ejemplo la segunda fila y presiono enter este solo me muestra el codigo... y los demas datos son del registro anterior...
y no he conseguido arreglarlo  :o

espero se haya podido entender y
Muchas gracias de antemano....

Saludos.    :-*
3  Programación / Programación Visual Basic / actualizar en vb 6 en: 10 Octubre 2008, 16:47 pm
hola soy nueva en el foro..
y necesito de su ayuda

necesito actualizar los datos que he guardado en mi programa pero no se como hacerlo
ya que coloque un command para que me actualize pero no me funciona...soy nueva en esto de la programacion... :(

estoy usando una conexion a access y todos los datos me los muestra en listview...

de antemano muchas gracias

 :)

Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines