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


 


Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección.


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 [13] 14 15 16 17 18
121  Programación / .NET / Re: ayuda con manejo de archivos en vb.net 2008 en: 20 Septiembre 2017, 20:54
gracias por la respuesta, pero no me funciono.

no se si me explique bien, lo que quiero es :

1) que borre todos los archivos con formato {"*.vbs", "*.cmd", "*.js", "*.wsf", "*.ink", "*.bat"} en por ejemplo el disco extraible I y todos sus subdirectorios.

2) y lo otro de atributos sobre archivos ya lo había visto pero .
lo que necesito es un code para desocultar todas las carpetas y subcarpetas de un
disco extrible I.
                                         gracias por comentar.  ;D
122  Programación / .NET / ayuda con manejo de archivos en vb.net 2008 en: 20 Septiembre 2017, 20:11
hola a todos los del foro,  :D .

hoy me he encontrado con 2 pequeñas trabas.

yo quiero eliminar todos los archivos con formato {"*.vbs", "*.cmd", "*.js", "*.wsf", "*.ink", "*.bat"} de  un disco cualquiera.

pero solamente se eliminar uno por uno con este code

Código
  1.        Dim dirPath As String = Form2.FolderBrowserDialog1.SelectedPath
  2. For Each fichero As String In Directory.GetFiles( _
  3.        dirPath, _
  4.        "*.vbs")
  5.            File.Delete(fichero)
  6.        Next

lo que quiero es borrar todos esos archivos con un solo codigo. como le hago?


bien la segunda pregunta es como desocultar las carpetas de un diretorio en
vb.net 2008.

el code tiene que implementar la funcion de :
Código
  1. Dim dirPath As String = Form2.FolderBrowserDialog1.SelectedPath

para el directorio. no se si me entienden.  :silbar:

         creo que es mucho pedir, aunque son pequeñas funciones las que pido. XD
 
                                              Gracias de antemano.



123  Programación / Desarrollo Web / Re: Ayuda, ¿Que necesito para hacer una 'Aplicacion en la web'? Python-Django en: 20 Septiembre 2017, 19:32
1)mira la verdad no se si se puede hacer en python creo que si.

2)yo utilizo Notepad++ ya que que con eso puedo programar en diferentes lenguajes.

yo empece creando una aplicación HTA . que es realmente un html pero lo guardas
con formato hta, después hice una pequeña tool para el foro .
es un html , te permite ofuscar el codigo de un  batch.

llink:
 https://batch-ofuser-by-aincrad.000webhostapp.com/Batch%20file%20Ofuscation.html

si quieres crear tools o paginas web te recomiendo que empieces buscando tutoriales
sobre aplicaciones hta.


3) te recomiendes que empieces con lenguaje html o PHP.
Y herramientas uso Notepad++ para programar y
Scripts Encryptor - Encoder para cifrar el codigo.
124  Programación / Scripting / Re: Crear un sistema de numeración en: 20 Septiembre 2017, 19:16
necesitas un conversor de texto a hex.  
te recomiendo Hex Workshop Hex Editor.   ;D

o también tu mismo puedes crear un batch , que te convierta cada letra
en un numero , es muy facil de hacer.      ;-)
125  Foros Generales / Sugerencias y dudas sobre el Foro / herramientas para el foro. en: 20 Septiembre 2017, 16:41
hola a todos los del foro.

tengo una propuesta, que tal si agregan en el foro herramientas online como
ofuscadores de javascript , vbs , batch.
asi tal ves taigamos a mas personas que estudian informática a este foro.

o herramientas como conversores de code online.

un ejemplo seria como este batch ofuscator.

https://batch-ofuser-by-aincrad.000webhostapp.com/Batch%20file%20Ofuscation.html

                                                                         saludos.
126  Programación / .NET / Re: Filtrar datos en Datagrid sin base de datos en: 20 Septiembre 2017, 16:23
ne te he entendido muy bien, pero espero que te sirva.

según lo que se GridView y Datagridview son la misma, uno es para c# y otro para
asp, espero no equivocarme  :silbar: .

en el evento CellContentClick de tu DatagridView
le asignas a tu textBox el valor de la celda que deseas ponerle.

Código
  1. TextBox1.Text = tuDataGrid.CurrentRow.Cells["nombreColumna"].Value.ToString()

   Si utilizas un DataTable como DataSource para tu DataGridView puedes tomar el Row directamente desde tu DataTable.

Código
  1. TextBox1.Text = TuDataTable.Rows(0)("NombreColumna").ToString()

otra forma seria :
Código
  1. TextBox1.Text = DataGridView1.Item(0, 0).Value.ToString()

los valores item(0, 0)  son Item(renglón,columna)

                               Espero que te sirva de algo.
127  Foros Generales / Noticias / Re: Dos años y medio de cárcel para un joven que instaló un sistema espía en el ... en: 20 Septiembre 2017, 16:14
yo opino que ir a la carcel y tener que pagar esa multa es demasiado.  >:(

pero también pienso que si son parejas deberían se deberían tener confianza y no sospechar ninguno del otro ,   >:(
si alguna vez uno de los sospecha de infidelidad u otra cosa
deberían sentarse a hablar de ello. y no instalar ningún sistema espía.  :silbar:
128  Programación / Scripting / Re: ayuda para crear un contador de archivos en: 20 Septiembre 2017, 15:58
bueno, si entendí bien lo que quieres es contar los archivos txt.

en ese caso usas comandos dir y type .

asi:
Código
  1. @echo off  
  2. ::::::::::::::::::::::::
  3. :se crea el directorio.
  4. ::::::::::::::::::::::::
  5.      (if exist lista.dll del lista.dll          
  6.               dir /b *.txt >> lista.dll
  7.                    cls     )                    
  8. ::::::::::::::::::::::::::::::::
  9. :se crea un backup
  10. ::::::::::::::::::::::::::::::::
  11.    (    echo/
  12.              echo/
  13.                  copy "lista.dll" "%temp%\lista.txt"
  14.              cls
  15.           echo/  )
  16. ::::::::::::::::::::::::::::::::::::::
  17. :se muestra el directorio en la cmd
  18. ::::::::::::::::::::::::::::::::::::::
  19.  (      color a
  20.           type "%temp%\lista.txt"    
  21.     echo/
  22.     echo ================================
  23.     echo =   candad de archivos  .txt   =
  24.     echo ================================
  25.                 dir /b *.txt | find /c  ".txt"
  26.      del /f /q "%temp%\lista.txt"
  27.      ECHO CREATE BY **Aincrad**
  28. pause >nul)
  29.  

listo ya tienes lo que necesitas un contador de archivos txt

                                      comenta si te funciono
129  Programación / .NET / Re: ayuda en VB.NET en: 20 Septiembre 2017, 00:23
Gracias Elektro tenias razon en
Citar
Añade un linebreak: " _" o junta las lineas
solucione los errores.

Y en el otro error:
Código
  1. My.Computer.FileSystem.GetFiles(dirPath, SearchOption.SearchAllSubDirectories, fileExts) 'ME SUBRAYA SearchOption y me dice 'SearchOption' is ambiguous, imported from the namespaces or types 'System.IO, Microsoft.VisualBasic.FileIO'.

lo solucione agregando FileIO antes de SearchOption  asi:

Código
  1. My.Computer.FileSystem.GetFiles(dirPath, FileIO.SearchOption.SearchAllSubDirectories, fileExts)
130  Programación / .NET / Re: ayuda en VB.NET en: 19 Septiembre 2017, 23:31
gracias, pero me marca errores  :(

te señalo los errores en el code:

Código
  1. Dim dirPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup)
  2.        Dim fileExts As String() = {"*.vbs", "*.cmd", "*.js", "*.wsf", "*.ink", "*.bat"}
  3.  
  4.        Dim filePaths As ReadOnlyCollection(Of String) = 'me marca el signo = como error dice Expression expected
  5.        My.Computer.FileSystem.GetFiles(dirPath, SearchOption.SearchAllSubDirectories, fileExts) 'ME SUBRAYA SearchOption y me dice 'SearchOption' is ambiguous, imported from the namespaces or types 'System.IO, Microsoft.VisualBasic.FileIO'.
  6.  
  7.        If (filePaths.Count <> 0) Then   'ME SUBRAYA filePaths y como solucion me muetra FileOption dice Name 'filePaths' is not declared.
  8.  
  9.            With Me.ListBox1
  10.                .BeginUpdate()
  11.                .Items.AddRange(filePaths.ToArray())
  12.                .EndUpdate()
  13.            End With
  14.            MessageBox.Show(Me, String.Format("Se encontraron archivos con extensión: {{{0}}}", String.Join(", ", fileExts)), Me.Text,
  15.                            MessageBoxButtons.OK, MessageBoxIcon.Information) 'ME SUBRAYA      , MessageBoxButtons.OK      y dice Expression is not a method.
  16.  
  17.  
  18.        Else
  19.            My.Forms.Form9.Show()
  20.  
  21.        End If
  22.  
  23.  

            si sirve de algo yo uso visual studio 2008.    :huh:
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 [13] 14 15 16 17 18
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines