Article View: es.comp.lenguajes.java
Article #29040Re: Necesito programilla para claves de acceso....
From: Juan
Date: Thu, 05 Mar 1998 00:00
Date: Thu, 05 Mar 1998 00:00
91 lines
3451 bytes
3451 bytes
Au� tienes un applet que trabaja con tres claves diferentes.
import java.util.*;
import java.awt.*;
import java.net.*;
public class Claves extends java.applet.Applet {
Button b1,b2;
TextField tt=new TextField("",15);
URL url[]=new URL[1];
public void paint (Graphics g) {
setBackground(Color.blue);
repaint();
}
public void init() {
tt.setEchoCharacter('*');
add(tt);
add(new Button("Aceptar"));
add(new Button("Cancelar"));
}
public boolean action(Event evt, Object arg) {
if (evt.target instanceof Button) {
String texto=((String)arg);
if(texto.equals("Cancelar")) {
try {
url[0]=new URL ("http://www.?");// url al cancelar
}
catch(MalformedURLException e) {
url[0]=null;
}
getAppletContext().showDocument(url[0],"_parent");
}
if(texto.equals("Aceptar")) {
String clave=tt.getText();
int tipo=0;
if(clave.equals("clave")) tipo=1;
if(clave.equals("otra clave")) tipo=2;
if(clave.equals("una tercera clave")) tipo=3;
switch(tipo) {
case 1:
try {
url[0]=new URL ("http://www.?");// url para clave
}
catch(MalformedURLException e) {
url[0]=null;
}
getAppletContext().showDocument(url[0]);
break;
case 2:
try {
url[0]=new URL ("http://www.?");// url para otra
clave
}
catch(MalformedURLException e) {
url[0]=null;
}
getAppletContext().showDocument(url[0]);
break;
case 3:
try {
url[0]=new URL ("http://www.?");// url para
una tecera clave
}
catch(MalformedURLException e) {
url[0]=null;
}
getAppletContext().showDocument(url[0]);
break;
default:
try {
url[0]=new URL ("http://www.duward.com/");
}
catch(MalformedURLException e) {
url[0]=null;
}
getAppletContext().showDocument(url[0],"_parent");
}
}
}
return true;
}
}
"blr" <blr@abaforum.es> wrote:
>Hola a todos. Necesitaria un programilla que pidiera una clave de acceso
>para entrar en una pagina web que estoy haciendo y que yo pudiera asignar
>una clave diferente a cada usuario para entrar. Os estoy muy agradecido.
>Un saludo.
>blr@abaforum.es
Technical Details
Message-ID:
<6dlnip$b6j$1@diana.bcn.ibernet.es>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<6bdb95$qpn$1@talia.mad.ibernet.es>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII X-Google-Thread: 1116f3,73bccf317d8af425 X-Google-Attributes: gid1116f3,public From: ovaj@latinmail.com (Juan) Subject: Re: Necesito programilla para claves de acceso.... Date: 1998/03/05 Message-ID: <6dlnip$b6j$1@diana.bcn.ibernet.es> X-Deja-AN: 331016406 References: <6bdb95$qpn$1@talia.mad.ibernet.es> Organization: Unisource Espana NEWS SERVER Newsgroups: es.comp.lenguajes.java