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

 

 


Tema destacado: Como proteger una cartera - billetera de Bitcoin


  Mostrar Temas
Páginas: [1]
1  Programación / Java / Implementar guardado de archivo (solucionado) en: 23 Febrero 2015, 05:12 am
Hola, verán estoy haciendo una práctica la cuál consiste en leer las palabras y números de un archivo de texto, así como guardarlo en otra ubicación (diferente a la de su origen).
Tengo la primer parte que es leer, más no se me ocurre que implementar para que guarde el archivo en otra ubicación.

Código:
import java.io.FileReader;
import java.io.IOException;
import java.io.StreamTokenizer;


public class Palabras {

int cont_pal =0;
int cont_num =0;

public Palabras()throws IOException
{
StreamTokenizer st = new StreamTokenizer(new FileReader("C:/Users/T800/Desktop/perro.txt"));
while(st.nextToken() != StreamTokenizer.TT_EOF){

if(st.ttype == StreamTokenizer.TT_WORD){
cont_pal++;
}
else if(st.ttype == StreamTokenizer.TT_NUMBER){
cont_num++;
}

}

System.out.println("Numero de palabras: "+cont_pal);
System.out.println("Numero de palabras: "+cont_num);
}

public static void main(String[] args) throws IOException {

new Palabras();


}

}

no sé si con un output podría funcionar.  :huh:
2  Programación / Programación C/C++ / Alguien ve el error en este programa en: 16 Abril 2013, 20:35 pm
El programa compara los días que hay entre dos fechas:

Código:
#include<stdio.h> 
 #include<stdlib.h>

 struct fecha
 {
  int dia, mes, year;
 } fechauno, fechados;

 int main (void)
 {
  int a, m, d, total;
   
  printf("Dame la primera fecha más reciente (dd/mm/aa):\n");
  scanf("%d*%d*%d", &fechauno.dia , &fechauno.mes, &fechauno.year);
  printf("Dame la segunda fecha (dd/mm/aa):\n");
  scanf("%d*%d*%d", &fechados.dia , &fechados.mes, &fechados.year);
   
  a = (fechauno.year - fechados.year) * 365;
  m = (fechauno.mes - fechados.mes) * 30;
  d = fechauno.dia - fechados.dia;
 
  total = a + m + d;
   
  printf("\n\nHay %d días entre las dos fechas insertadas.\n");
  system(" pause ");
  return 0;
 }

cualquier cosa que escriba me arroja como resultado "4210716"
3  Programación / Programación Visual Basic / Número en texto muestra formulario en: 7 Abril 2013, 17:21 pm
Tengo un digitador el cual si recibe una cifra determinada muestra un formulario diferente, de lo contrario lanza un mensaje de error y permanece igual, no cambia de formulario.

El problema viene a la hora de poner el código:

Código:
Private Sub Command1_Click()
Text1.Text = Text1.Text + "1"
End Sub

Private Sub Command4_Click()
Text1.Text = Text1.Text + "2"
End Sub

....

Private Sub Command2_Click()
If Text1.Text = "1111" Then
Form2.Show
Else: MsgBox "error de clave"
End If

If Text1.Text = "3312" Then
Form3.Show
Else: MsgBox "error de clave"
End If
End Sub



Cada que escribo "3312" me manda sin problema al formulario, mismo caso con "1111" pero el msgbox me saldrá forzosamente ya que a pesar de ser la cifra correcta no coincidé una con la otra.

Cuál sería el método para que el msgbox aparezca cuando no digite las cifras predeterminadas?

"3312" - muestra formulario 3
"1111" - muesrta formulario 2

"otro" - mensaje de error
4  Programación / Programación Visual Basic / Duda con programa de una Jukebox en: 3 Abril 2013, 06:02 am
borrar tema
5  Programación / Programación C/C++ / Ayuda: con sustitución de funciones en: 5 Marzo 2013, 17:53 pm
Buen día, tengo una duda. En el instituto nos han pedido un programa que nos de la media aritmética de varios valores. Hice el siguiente código:

Código:
#include<stdio.h>
#include<conio.h>
#include<stdlib.h>
#include<math.h>
main()
{
    int n,i;
    float c,ma,*a;
     
 
    printf("Introduce n\n");
    scanf("%d",&n);
    a=(float*)malloc(sizeof(float)*n);
    printf("Digita los %d numeros\n",n);
    for(i=0;i<n;i++){
                     scanf("%f",&a[i]);
                     }
    printf("Los %d numeros que ingresaste son:\n",n);
    for(i=0;i<n;i++){
                     printf("%f\n",a[i]);
                     }
    c=0;
    for(i=0;i<n;i++){
                       c+=a[i];
                       }
    ma=c/n;
    printf("La media es: %f\n",ma);
                                                       
 getch();
}

El programa ya está funcionando como el profesor quería, excepto por una cosa, a pesar de que me aplaudió el uso del arreglo de números no me ha permitido usar la función sizeof así como tampoco  la función malloc dentro del programa pues dice "aun no las hemos implementado junto al resto de la clase" ^^ y me ha obligado a cambiar el código con funciones que ya he usado en clase, pero,  el problema es que no encuentro función alguna que le pueda quedar al programa.
Se podría usar algo más básico y que no genere muchos cambios en el código?
6  Programación / Programación Visual Basic / Generar .exe en: 26 Noviembre 2012, 19:41 pm
Recuerdo que una vez hice un programa con dos formularios y al generar el .exe lo corría en la computadora pero aparecían dos ventanas correspondientes a los dos formularios.

Ahora, hice un nuevo programa con 56 formularios. Se puede hacer algo para que al generarlo a .exe se mantenga en una sola ventana y no despliegue 56?

Usé Visual Basic 6.
7  Programación / Programación Visual Basic / Ingresar y Mostrar Datos VB6 en: 20 Noviembre 2012, 04:24 am
Estoy haciendo un sistema de banco, en el cual se escoge un servicio que después de seleccionado envía al formulario correspondiente (al servicio). En el formulario del servicio hay variados campos para rellenar, por ejemplo: Nombre, Domicilio, Ciudad, etc.

Lo que quiero saber es si se puede ingresar los datos, después hacer un boton de "guardar" (que después lanzará un msgbox con la confirmación) y que después los haga aparecer en un nuevo formulario o algún otro recurso pero que muestre "Nombre:xxxxxxx" "Domicilio:xxxxxxxxxxx", etc. No estoy usando base de datos.

Por el momento, lo que llevo del programa, además del acceso (user, pass) y del menú principal es lo siguiente:


Código:

Private Sub Command1_Click()
II_Menú_Servicios.Show
End Sub

Private Sub Command2_Click()
If (List1.List(List1.ListIndex) = "Avalúos") Then
III_P_AVALUOS.Show
End If
If (List1.List(List1.ListIndex) = "Banca por Celular") Then
IV_EMPRESAS.Show
End If
If (List1.List(List1.ListIndex) = "Crédito") Then
IV_EMPRESAS.Show
End If
If (List1.List(List1.ListIndex) = "Crédito Hipotecario") Then
IV_EMPRESAS.Show
End If
If (List1.List(List1.ListIndex) = "Inversiones") Then
IV_EMPRESAS.Show
End If
If (List1.List(List1.ListIndex) = "Cajero Automático") Then
IV_EMPRESAS.Show
End If
If (List1.List(List1.ListIndex) = "Tarjeta de Crédito") Then
IV_EMPRESAS.Show
End If
If (List1.List(List1.ListIndex) = "Banca por Internet") Then
IV_EMPRESAS.Show
End If
End Sub

Aquí por ejemplo al seleccionar de la lista el elemento "Avalúos" mandará al formulario "Avaluos" que es donde mostrará los campos para ser ingresados los datos antes mencionados.

Saludos

___________

Acceso:

Private Sub Command1_Click()
If Text1.Text = "Brad" And Text2.Text = "Maddox" Then
MsgBox ("BIENVENIDO AL SISTEMA")
II_Menú_Servicios.Show
Else: MsgBox ("NOMBRE DE USUARIO O CONTRASEÑA INCORRECTOS")
End If
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
End Sub

Private Sub Command3_Click()
If MsgBox("¿Está seguro que quiere salir del sistema?", vbExclamation + vbYesNo, "Advertencia") = vbYes Then
End
End If
End Sub
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines