Hola!

Mi pregunta era si un NAS (Disco duro de red) puede usarse como servidor HTTP para alojar una web. Si fuera posible esto, ¿Que limitaciones tendria?

Un saludo

Buenas!

Tengo un problema con el canal derecho del audio frontal, y es que solo se escucha el aricular izquierdo en cualquier casco que conecte.

Mi placa es una Asus M4A78LT-M y uso windows 7 entreprise.

Un saludo

Hola buenas!

Quiero probar un poco los riesgos que tiene andar por ahi conectandose a redes desconocidas. Para ello mi idea era dejar preparado un AP(Punto de acceso) y un ordenador con sniffer para tratar de capturar historiales y demas de posibles intrusos.

Habia pensado en conectar el AP, el PC y el router en un Hub, de manera que el medio sea compartido, y ver a si todos los riesgos que pueden existir si el dia de mañana a alguien se le ocurre algo parecido.

Quisiera saber si este es el mejor metodo, si es posible que esto funcione, y ver un poco cuantos se conectan a AP abiertos, y lo que comparten.

No voy a usar esto para dañar a nadie ni parecido, como he dicho solo quiero ver los riesgos

Un saludo

Muy buenas ^^

Mi pregunta era la siguiente, ¿Existe alguna empresa a la que se le pueda encargar copias de CD-ROM? Es decir, que fabriquen el CD con el contenido (no que se grabe en un CD virgen) con su etiqueta y su caja.

Se que venden papel especial para pegar encima de los CD grabados, y cajas vacias, pero me preguntaba si por ejemplo para 10 copias o asi, pudiera salir rentable encargarlos.

Un saludo

Hola!

Tengo un lector de tarjetas como este http://www.appinformatica.com/multilectores-card-reader-coolbox-cr600-v2-dnie-+-sim.php desde el dia que compre el ordenador.

La bios y ubuntu lo reconoce perfectamente, y lee las tarjetas del mismo, sin embargo win 7 tambien lo reconoce, pero al introducir tarjetas, no monta ninguna unidad en mi equipo.

Un saludo ^^

¡Buenas!

Resulta que hace unos dias monte un ordenador por piezas, y entre los componentes compre dos discos duros SATA II para ponerlos en RAID 0.

En teoria su tasa de velocidad deberia ser de 300 MB/s * 2, pero por alguna razon segun el test de velocidad.... no pasa de 170 MB/s O_o

No es tampoco que importe mucho... pero ya que me gastado el dinero, pues aprovechar lo comprado...

¿Alguna idea? Un saludo

Buenas!

Me gustaria saber si hay alguna forma de impedir que se ejecute un programa con parametros :S

Podria ser una solucion empacarle dentro de otro programa, pero la verdad no se muy bien como hacerlo...

¿Alguna alternativa?

Un saludo ^^

Buenas!

No se si todos conocereis las nuevas tarjetas que estan sustituyendo a la banda magnetica o las tarjetas con SIM.

Aparentemente, no llevan nada que se pueda ver por fuera, y a la hora de pasarlas por la maquina no hay un contacto electrico, si no que va todo inalambrico.

Por lo que he leido, llevan un pequeño microprocesador, y una memoria (Me imagino que flash...¿?) y me gustaria saber si puedo conseguir algun hardware para programarlas o leer lo que hay en su interior (seguramente este cifrado fuertemente xD)

Para los mal pensados, no estoy planeando piratearlas ni nada parecido ¬¬ (Como si fuera tan facil juas xD) solo me entro la curiosidad xD

Un saludo ^^

¡Buenas! He empezado hace poco a aprender algo de VB6... y de momento poco he conseguido U_u
Os dejo el source de esta calculadora estilo windows.
Aun no se porque tiene bug el boton de coma...
Esta bastante simplificada... ya que no conozco aun demasiadas funciones xD

Dim asuma, aresta, amulti, adivi
Dim result As Boolean
 
Private Sub Command11_Click()
'Tecla +
Text1.Text = asuma + Val(Text1.Text)
asuma = Val(Text1.Text) & d 'el caracter sirve para que diferencie entre el 0
'de valor de la variable por defecto y el 0 metido por el usuario
result = True
End Sub
 
Private Sub Command13_Click()
'Tecla -
If Not aresta = 0 Then
Text1.Text = aresta - Val(Text1.Text)
End If
aresta = Val(Text1.Text) & d 'el caracter sirve para que diferencie entre el 0
'de valor de la variable por defecto y el 0 metido por el usuario
result = True
End Sub
 
Private Sub Command14_Click()
'Tecla *
If Not amulti = 0 Then
Text1.Text = amulti * Val(Text1.Text)
End If
amulti = Val(Text1.Text) & d 'el caracter sirve para que diferencie entre el 0
'de valor de la variable por defecto y el 0 metido por el usuario
result = True
End Sub
 
Private Sub Command15_Click()
'Tecla /
If Not adivi = 0 Then
Text1.Text = adivi / Val(Text1.Text)
End If
adivi = Val(Text1.Text) & d 'el caracter sirve para que diferencie entre el 0
'de valor de la variable por defecto y el 0 metido por el usuario
result = True
End Sub
 
Private Sub Command12_Click()
'Tecla =
If Not asuma = 0 Then
Text1.Text = Val(Text1.Text) + asuma
End If
If Not aresta = 0 Then
Text1.Text = aresta - Val(Text1.Text)
End If
If Not amulti = 0 Then
Text1.Text = Val(Text1.Text) * amulti
End If
If Not adivi = 0 Then
Text1.Text = adivi / Val(Text1.Text)
End If
asuma = 0
aresta = 0
amulti = 0
adivi = 0
result = True
End Sub
 
Private Sub Command1_Click()
'Tecla 7
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 7
Else
Text1.Text = 7
result = False
End If
End Sub
 
Private Sub Command10_Click()
'Tecla 0
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 0
Else
Text1.Text = 0
result = False
End If
End Sub
 
Private Sub Command2_Click()
'Tecla 8
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 8
Else
Text1.Text = 8
result = False
End If
End Sub
 
Private Sub Command3_Click()
'Tecla 9
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 9
Else
Text1.Text = 9
result = False
End If
End Sub
 
Private Sub Command4_Click()
'Tecla 4
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 4
Else
Text1.Text = 4
result = False
End If
End Sub
 
Private Sub Command5_Click()
'Tecla 5
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 5
Else
Text1.Text = 5
result = False
End If
End Sub
 
Private Sub Command6_Click()
'Tecla 6
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 6
Else
Text1.Text = 6
result = False
End If
End Sub
 
Private Sub Command7_Click()
'Tecla 3
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 3
Else
Text1.Text = 3
result = False
End If
End Sub
 
Private Sub Command8_Click()
'Tecla 2
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 2
Else
Text1.Text = 2
result = False
End If
End Sub
 
Private Sub Command9_Click()
'Tecla 1
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & 1
Else
Text1.Text = 1
result = False
End If
End Sub
 
Private Sub Command16_Click() 'Esto aun no funciona bien, no distingue
'entre 0 y 0. y la funcion val() hecha abajo todas las comas (¿?)
'Tecla , (No funciona)
If Not Text1.Text = 0 And result = False Then
Text1.Text = Text1.Text & "."
Else
Text1.Text = "0."
result = False
End If
End Sub
 
Private Sub Command17_Click() 'Tecla de borrado
Text1.Text = 0
asuma = 0
aresta = 0
amulti = 0
adivi = 0
result = False
End Sub
 
Private Sub Form_Load()
result = False
End Sub

Un saludo ^^ a ver si la podemos mejorar xD

Edit: Aqui esta el ejecutable y el form
http://www.megaupload.com/?d=TMQM6QBP