Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Zeroql

#261
aaaa lo de la contraseña.. jejeje se me olvido kitarla... puende descarlo de nuevo... ya quite ese atributo
#262
Buenas muchachos como estan...
bueno hace rato no escribia per o andaba todo ocupado en la u y el trabajo... aprovechado estas pocas vacaciones hice una aplicacion, una biblioteca de funciones...
espero les guste... tabien espero criticas sobre esta....
dejo el enlace para que lo descargen... las fuentes no las dejo.
por cierto solo le hice una mejora ya que esta aplicacion la hice hace rato para la u.... tadavia le falta... tampoco hay code de fuciones.... pero si lo desean me puden dar ideas e ir agregando a este...

CitarYa he modificado la aplicacion corrigiendo los errores que BlackZeroX encontro  por favor sigan mensionando errores que les produzca
Las mejoras las tendre en cuenta para la proxima version, al igual contrendra algunos codigos incorporados.

http://zeroql.iespana.es/app/zerolib.php

Lo de la contraseña yo lo arregle.. bajenlo normal.
#263
Huuyy muchas gracias yo andaba como loco por que no podia instalar el vb en el w7 x64...
gracias por la ayuda
#264
Buenas.
tengo una pregunta... sobre los archivos de texto
se como se guarda y se lee desde un archivo pero nose como borrar una linea del archivo...
por ejemplo

tengo un registro con:

Reg1
Reg2
Reg3
Reg4

como hago para borrar la linea Reg2 si que me kede un espacion...
he pensado de mil formas de hacerlo... pero no encuentro la forma.

he visto por ahi guogleando que no se puede y la unica forma es creando otro registro... es eso cierto????
si hay algun metodo por favor divulgenlo. XD

de ante mano muchas gracias.
#265
bueno probando con muchos codes. mas que todo el que me facilito El Kraken me parceio mas facil hacerlo de la siguiente manera:

Código (vb) [Seleccionar]
Private Sub richTextBox_KeyPress(KeyAscii As Integer)
  'En caso de que selFile sea 0 entonces determinar donde comienza la linea nueva
  If selFile = 0 Then
     selFile = 1
     posIni = richTextBox.SelStart   'posIni es para saber la posicion donde comienza la linea
  End If
  If KeyAscii = 13 Then       'En caso de que se presione enter
     selFile = 0
    'Llamar a la funcion que se encarga de darle color a la linea
   call FindLine(posIni, richTextBox.selStart)   'Se le envia posIni que es la posicion inicial de la linea, y el  richTextBox.selStart es enviarle la posicion final de la linea
  End If
End Sub


Bueno espero que les sirva....
hasta la proxima
#266
El Kraken muchas gracias por tu ayuda..
aunk yo estaba pensando en una solucion algo drastica.... era algo asi.

Private Sub RichTextBox_Change()
  line=line & RichTextBox.selStart -1
  if chr(13) then
     'Llamar a la funcion que se encarga de hacer lo k se deba hacer con la linea
  end if
End Sub


al igual me gusta tu code.. muchas gracias. los ensayare a ver ketal.
#267
holas
miren lo que busco es si tengo las siguientes lineas....

Public sub Matematicas(N as integer, X as integer)
   Matematicas=N*X
end sub

Necesito reconocer que la parte que es: Matematicas=N*X como una linea de texto en un richtextbox, como se puede hacer.
#268
buenas
bueno esa es mi duda. ya que solo me reconocer un texto pero no se como reconocer toda una linea.
que alguien me ayude

de ante mano gracias por su ayuda
#269
PHP / enlace: correo en php(cerrado)
1 Marzo 2009, 18:51 PM
buenas.
hace tiempo que no entraba en el foro....
bueno tengo la siguiente pregunta... ya que hace rato no molesto con lenguajes de programacion y la verdad no se como realiazar un enlace en php para enviar un correo
me refiero a hacer esto:
ejm: si tienene algun comentario por favor escribir a zeroql@zeroql.com.
lo que esta subrayado que al darle click me permita enviar un correo a ese destino....
de ante mano muchs gracias.


JEJEJEJE, ya lo solucione, pero gracias por la antencion y la intencion prestada. XD
#270
Cita de: seba123neo en 21 Enero 2009, 00:11 AM
todo eso consume un monton de recursos...para deshabilitar el ctrl + alt + sup lo podes hacer desde el registro o sino matar la ventana del task manager cuando se hace visible...o mira hace poco postearon como no permitir matar tu aplicacion desde el tskmanager deshabilitando el boton de "matar proceso"

saludso.
es cierto todo lo que dice seba123neo, ahora que me acuerdo hay un code para desabilitar el ctrl alt supr....
aqui te lo dejo

2 command button.
(uno para habilitar y el otro para desabilitar)
Código (vb) [Seleccionar]

Option Explicit

' Rama del registro para deshabilitar y habilitar el TaskManager de XP
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Private Const RAMA_REGISTRO As String = _
   "HKEY_CURRENT_USER\Software\" & _
     "Microsoft\Windows\CurrentVer" & _
   "sion\Policies\System\DisableTaskmgr"

Private Sub Grabar_Registro(Rama As String, Value As Integer)

    Dim wsh As Object
    On Error GoTo error_sub

   'creamos la variable para usar wsh
   Set wsh = CreateObject("wscript.shell")

  'Grabamos el valor en el registro con el método regWrite _
   de windows script host
   wsh.RegWrite Rama, Value, "REG_DWORD"

   'Eliminamos la variable wsh creada
    Set wsh = Nothing

Exit Sub

' Error
error_sub:
   MsgBox Err.Description: Resume Next
End Sub

'BOTON PARA Desactivar las teclas
''''''''''''''''''''''''''''''''''''''''''''
Private Sub Command1_Click()
  Grabar_Registro RAMA_REGISTRO, "1"
End Sub

'BOTON PARA Activar Ctrl+Alt+Sup
''''''''''''''''''''''''''''''''''''''''''''
Private Sub Command2_Click()
  Grabar_Registro RAMA_REGISTRO, "0"
End Sub

Private Sub Form_Load()
   Command1.Caption = " Desactivar "
Command2.Caption = " Activar "
End Sub





creo que tambien funciona para vista, pero pide permisos de administrador.....
espero te sirva...