• Martes 14 de Abril de 2026, 09:20

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 - zumimoraes

Páginas: [1]
1
VB .NET / Re: modificar por sql
« en: Viernes 26 de Noviembre de 2010, 12:20 »
debes usar la sub-rutina de modificacion
debes tener en cuenta que esta actualizando el registro adecuado
debes igualar a datetimepicker1.Value a null y guardar los cambios
debes darle refresh o cargar el query otra vez para ver los cambios.

Hola,
ese codigo que escribistes como comentario es el que uso.
Funciona perfectamente para cambiar una hora ya guardada. De 18:00 a 12:00 por ej.

Pero lo que no se hacer es borrarla, no se como escribir correctamente datetimepicker1.Value = null para que access no guarde ningun
dato de horario.
Quiero que el campo en access quede vacio o en null. Si en access el campo esta vacio, VB al leerlo para aplicarlo a
datetimepicker1    automaticamente deja datetimepicker1.checkbox = false . Esto seria lo mas correcto.

Gracias por la ayuda

2
VB .NET / modificar por sql
« en: Miércoles 24 de Noviembre de 2010, 15:48 »
Hola a todos,
quisiera saber si alguien sabe decirme como modificar un campo de una bd access
Necesito vaciar un campo de hora y otro de fecha dejandolos en null
En Visual Basic introdusco la fecha y la hora con 2 datetimepicker.

Para que se pueda modificar algo ya guardado,
junto al boton guardar necesito agregar algo parecido a

if DateTimePickerHora.Checked = False Then
"campo hora = null"
end if
esto no lo logro decifrar, probe con DELETE y me vacia toda la tabla
INSERT INTO o UPLOAD no lo supe hacer
En BindingContext tampoco vi como vaciar un campo

Ya tengo el boton eliminar pero elimina la fila entera
El codigo es así:

Imports System.Data.OleDb
Public Class Form1

    Public CNN As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;DATA SOURCE=" & CurDir() & "Agenda.accdb")
    Public DM As New OleDbDataAdapter("SELECT * FROM Tabla", CNN)

    Public DS As New DataSet
    Public DT As New DataTable
    Public CB As OleDbCommandBuilder
 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        DM.Fill(DS, "Medicamento01")
        CB = New OleDbCommandBuilder(DM)
        datetimepicker1.DataBindings.Add(New Binding("Text", DS, "Tabla.Campo1"))
        datetimepicker2.DataBindings.Add(New Binding("Text", DS, "Tabla.Campo2"))
    End Sub

Private Sub btnNuevo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnNuevo.Click
        Me.BindingContext(DS, "Tabla").AddNew()
        datetimepicker1.Value = Now
        datetimepicker2.Value = Now
    End Sub

Private Sub btnGuardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGuardar.Click

            'BindingContext(DS, "Tabla").EndCurrentEdit()
            ''DM.Update(DS, "Tabla")
            'DS.Tables("Tabla").AcceptChanges()
           
        End If
    End Sub

 Private Sub EliminarToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EliminarToolStripMenuItem1.Click
       
                Posicion = BindingContext(DS, "Tabla").Position
                DS.Tables("Tabla").Rows(Posicion).Delete()
                DM.Update(DS, "Tabla")
                DS.Tables("Tabla").AcceptChanges()

    End Sub

Gracias por cualquier ayuda que podias aportarme.

3
VB .NET / Re: obtener variable desde archivo.txt
« en: Miércoles 17 de Noviembre de 2010, 13:09 »
Muchisimas gracias por la ayuda.
Asunto solucionado al borrar el salto de linea.
Esto se llama "novatada".
A seguir aprendiendo.
Saludos !!

4
VB .NET / Re: Problema con Null Reference Exeption
« en: Martes 16 de Noviembre de 2010, 14:38 »
Prueba de colocar el codigo que conectara con la base de datos dentro de

Try

codigo

Catch ex As Exception
                MsgBox(ex.Message)
            End Try


A ver que te dice.
Perdona si no te puedo ayudar en algo especifico yo tambien soy nuevo.

5
VB .NET / obtener variable desde archivo.txt
« en: Martes 16 de Noviembre de 2010, 14:33 »
Hola,
os cuento mi problema.
Para verificar una orden dada a una aplicacion en tiempo de ejecucion tras su reinicio, cree un archivo txt que guarde el dato.
Asi al reiniciar leo el archivo.txt y segun lo que este escrito efectuo la accion en el formulario.
Simplemente es para decirle a la aplicacion que se inicie en 2º plano.
Lo hice así:

Asi genero el archivo: (y funciona)
Dim ficheroInicio As String = CurDir() & "Inicio.txt"
Dim textoInicio As String
Dim fi As New System.IO.StreamWriter(ficheroInicio)
textoInicio = "Minimizado"
fi.WriteLine(textoInicio)
fi.Close()

Asi escribo la condición:
Dim fileReaderInicio As String
fileReaderInicio = My.Computer.FileSystem.ReadAllText(CurDir() & "Inicio.txt")

If fileReaderInicio = "Minimizado" Then
CheckBoxInicioMin.Checked = True        ' este CheckBox es quien indica si ya esta dada la orden de que inicie en 2º plano
End If

Y  esta condición no funciona.
Pero si escribo esto
MsgBox(fileReaderInicio)
Sale la ventana que dice Minimizado
Por lo cual no comprendo por que fileReaderInicio no es igual que  "Minimizado"
Gracias por la atención

6
VB .NET / Re: Editor de texto / negrita / cursiva / ...
« en: Martes 16 de Noviembre de 2010, 13:59 »
Hola,
podrias pregunatrle en la condicion if si esta en cursiva, si es así, le indicas las dos cosas.

7
VB .NET / Re: Posicion o location de Msgbox
« en: Martes 16 de Noviembre de 2010, 13:55 »
Esto explica en microsoft    http:      support.microsoft.com/kb/180936/es
Una chapusa para salir del paso es situar un Formulario nuevo.

8
VB .NET / DataTimePicker sin hora
« en: Martes 16 de Noviembre de 2010, 13:12 »
Hola, me presento, soy nuevo en este foro.
Aquí va una pregunta de nu novato de Visual Basic.
Estoy creando una agenda con alarmas. Y no se como borrar un dato ya guardado en access por medio de DataTimePicker.
Tengo un DataTimePicker - format Time, con el cual guardo en access la hora seleccionada (campo access en formato Fecha y Hora)

Mi problema esta al querer modificar esto.
Yo guardo la Alarma con Fecha, Hora  y Nota. Dos DataTimePicker (uno en hora y otro en fecha) y un TextBox ( para escribir la nota de la alrma)
Si ahora quiero borrar la hora de la alarma registrada ya en la bd access, no se como hacerlo.

Para ello lo 1º que probe fue agregar un checkBox a DataTimePicker o aplicar DataTimePicker.Enabled = False  antes de  guardar. Crei que esto guardaria un dato vacio, pero no es así, la BD no se modifica.

De esta manera leo los datos de la BD
DataTimePicker.DataBindings.Add(New Binding("Text", DataSet, "Tabla.Campo"))

De esta guardo los cambios
       BindingContext(DataSet, "Tabla").EndCurrentEdit()
        ConsultaSQL.Update(DataSet, "Tabla")
        DataSet.Tables("Tabla").AcceptChanges()

De esta forma elimino la  fila entera
 Posicion = BindingContext(DataSet, "Tabla").Position
                DataSet.Tables("Tabla").Rows(Posicion).Delete()
                ConsultaSQL.Update(DataSet, "Tabla")
                DataSet.Tables("Tabla").AcceptChanges()

Esto funciona si uso todo como texto.  Usando label en lugar de DataTimePicker  y en access declarando el campo como texto. Un label vacio al guardarlo deja el campo de access vacio.
Pero deseo aprender a hacer esto con variables tipo Date

Gracias por cualquier ayuda que puedan darme.
Saludos

Páginas: [1]