Mensajes

[vbNewLine]

Hola, pues si sabes como agregar un nodo, ya sabes como ingresar todos esos, haces un split y el separador le pones vbNewLine y cuando se llene el array lo recorres y vas insertando en el treeview, creo que es algo facil, no hay nada mas que decir.si te qudaron todos iguales es porque no te estas moviendo en el array.

saludos.

Hola, no estoy muy metido en als operaciones de bit a bit de esta forma pero investigando arme algo asi:

Código (vb) [Seleccionar] Expandir

Option Explicit
Private Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" (Dest As Any, Src As Any, ByVal DestL As Long)
   
Private Sub Form_Load()
    Dim a As Long
    Dim b As Long
    Dim l As Long
   
    a = CDec(4195038069#)
    MoveMemory l, ByVal VarPtr(a) + 8, 4
   
    b = &HF0F
    Debug.Print (l And b)
End Sub

y retorna 773. en .NET funciona sin hacer tanto lio, o sea funciona como lo pusiste primero. si alguien sabe la forma sin hacer todo eso mejor.aca dice algo del tema y dice de algunas limitaciones en los tipos de datos a lo ultimo de la pagina, si no lei mal.

Operadores lógicos y bit a bit en Visual Basic

saludos.

[[ code=vb] [ /code]]

puedo parecer algo noob pero como uso el geshi?

encerra el codigo entre [ code=vb] [ /code] , (quitale el espacio despues del corchete). y una recomendación es que uses Hook para el teclado, es lo mejor, no tenes que andar renegando con Timers.si buscas en el foro vas a encontrar un monton de ejemplos.

muy bueno, ahora me hiciste acordar de que tengo que hacer un post unico para juntar todo estos codigos, ahora dentro de un rato me pongo a hacerlo y te aviso que lo postees ahi cuando tengas uno.

saludos.

[RegisterHotKey]

me lei el tuto de recursosvisualbasic.com.ar y ya entiendo casi todo el codigo,
lo puse en un modulo y ya me funciona y con respecto a restaurar el keylogger me hice un "apaño"

modifique el codigo del keylogger para que cuando se pulse la tecla re pag se restaure

y asi me ahorre muchas lineas de codigo y como no le veo ninguna funcion util a esa a tecla a la hora de monitorizar un ordena...

si alguien sabe como puedo hacer una combinacion de teclas en vez de una seria mejor

para el keylogger uso GetAsyncKeyState y he probado a poner por ejemplo

Código [Seleccionar] Expandir

Private Sub Timer1_Timer()
Dim i, X As Integer

For i = 1 To 255
X = GetAsyncKeyState(i)

If X = -32767 Then
Select Case i
Case vbKeyPageUp & vbKeyPageDown: Form1.Visible = True

ahora que lo pienso tal vez deberia haber usado "and" en vez de "&"

ya te lo puso Leandro arriba, usa RegisterHotKey y UnregisterHotKey para registrar combinaciones de teclas y usarlas, aparte es mejor , ya que no usa Timers.

prueba en el evento form_unload() un kill(app.path & "\" & app.exename & ".exe")

si fuera asi de facil  , repito que busque sobre Melt que hay ya posteado en el foro.

[Melt]

Hola, busca sobre Melt en el foro o en internet ya hay codigos de eso.

saludos.

Hola, pues si pueden ser los permisos, para escribir en el registro puede ser que debas ser administrador, no tengo win 7 pero es posible que no te deje escribir, de ultima entras como adminsitrador y probas si asi deja.

saludos.

No no.. me referia a que tendre que concatenar porque:
Tengo 12 carpetas, y dentro de cada carpeta tengo 31 archivos de texto con cada linea una entrada para la base de datos.. entonces hago lo sigueinte:

(aunque se me presento otro problema.. leer debajo de todo)

Código (vbnet) [Seleccionar] Expandir

   Private Sub INSERTAR(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim conexión As New SQLite.SQLiteConnection()
       Dim Consulta As SQLite.SQLiteCommand
       Dim linea As String = ""
       conexión.ConnectionString = "Data Source=" & Database & ";"
       conexión.Open()
       Consulta = conexión.CreateCommand
       For Mess As Integer = 1 To 2 '12
           For Diaa As Integer = 1 To 2 '31
               Dim Lectura As StreamReader = New StreamReader("C:\Users\Noel\Desktop\BrodaSoft\Visual Basic Proyectos\BACKUP's\VIDay\Version 7 Oficial\DataBase\" & Mess & "\" & Diaa & ".txt", System.Text.Encoding.Default, False)
               While True
                   linea = Lectura.ReadLine
                   If linea = "" Then
                       Exit While
                   End If
                   linea = linea.Replace("'", "-")
                   linea = linea.Replace("\", "")
                   linea = linea.Replace("""", "-")
                   Consulta.CommandText = "INSERT INTO Efemerides (Fecha, Texto, Version) VALUES ('0000-" & Mess & "-" & Diaa & "', '" & linea & "', '1')"
                   Consulta.ExecuteNonQuery()
               End While
               Lectura.Dispose()
               Lectura.Close()
           Next
           MsgBox("Fin de mes")
       Next
       Consulta.Dispose()
       conexión.Close()
       MsgBox("Listo")
   End Sub


Como veran, leo éste archivo:
C:\Users\Noel\Desktop\BrodaSoft\Visual Basic Proyectos\BACKUP's\VIDay\Version 7 Oficial\DataBase\0" & Mess & "\" & Diaa & ".txt"
Que segun los valores de los FOR, entraré al 1º dia del 1º mes:
C:\Users\Noel\Desktop\BrodaSoft\Visual Basic Proyectos\BACKUP's\VIDay\Version 7 Oficial\DataBase\1\1.txt"
E insertará la 1º linea de ese archivo.. y colocará en la fecha de ingreso: 0000-1-1

Como hago para que ese 0000-1-1 pase a ser 0000-01-01 ??? porque aunque no lo crean, da error en el formato data al hacer el Select :O



Las carperas van del 01 al 012 (era así porque en su momento RIPWAY no me permitia nombre tan corto en carpeta )
Y los archivos, del 1 al 31

Cambiarle el nombre a las carpetas, es facil... le pongo del 01 al 12 si quiero.. pero que hago con los archivos???
Capaz tenga que jugar un poco con acumuladores.. y problema solucionado.. ya vere que ahgo..

con un simple Format() se soluciona...

todo depende..obvio que aumenta el tamaño...depende del motor de base que uses y al potencia de este..si usas access te diria ya que NO...pero si usas SQL Server lo podes hacer tranquilo..he visto bases de datos que llegan a pesar 10 GB y lo de las imagenes es un tema menor...igualmente lo del path no es mala opcion...esto lo dice un experto:

El almacenamiento de imágenes en bases de datos no es una técnica comúnmente utilizada, ya que incrementa drásticamente el tamaño de la misma, de cada registro, entre otros inconvenientes; normalmente solo suele almacenarse la ruta de la imagen. Sin embargo en algunas ocasiones es necesario almacenarlas cuando se quiere aprovechar las características de gestión del SGBD elegido, como por ejemplo en la definición de un plan de mantenimiento, automatizando las copias de seguridad donde incluiría todo el catálogo de imágenes junto con la copia de seguridad. La mejor elección de la forma como guardar las imágenes siempre dependerá del ambiente de operación de la aplicación.