Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Brauche neues Design und Codeverbesserung ;)
Gehe zu Seite 1, 2  Weiter
 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Devilkevin
aka Kerstin


Anmeldungsdatum: 11.11.2004
Beiträge: 2532
Wohnort: nähe Mannheim

BeitragVerfasst am: 30.03.2005, 22:16    Titel: Brauche neues Design und Codeverbesserung ;) Antworten mit Zitat

Hi, ich habe grade nen alten Code ausgegraben zwinkern
In der Datei C:\pass.txt muss natürlich das Password stehen.
Damit das ganze Irgendwie funzt muss (bzw. einen Sinn ergibt) muss das Progg in die Autostart Datei von Windoof zwinkern.

Code:

CLS
PRINT
COLOR 15
PRINT "  [Pa$$word Controller]"
PRINT

start:
INPUT "  Bitte das Password eingeben ", eingabe$
OPEN "C:\Pass.txt" FOR INPUT AS 1
password$ = INPUT$(CINT(LOF(1)), 1)
CLOSE 1
SELECT CASE eingabe$
 CASE password$: GOTO ex
 CASE ELSE: GOTO wron
 
END SELECT

ex:

COLOR 2
PRINT "  Eingabe war richtig !"
END


wron:

COLOR 4
PRINT "  FALSCH - Neu probieren !"
COLOR 15
GOTO start



Wenn jemand Lust hat, kann er mir Design Vorschläge oder Codeverbesserungen geben. Das Design ist nähmlich GAAAAAR nicht mein Ding.

lächeln
_________________
www.piratenpartei.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Tomtitom



Anmeldungsdatum: 20.09.2004
Beiträge: 308

BeitragVerfasst am: 30.03.2005, 23:53    Titel: Antworten mit Zitat

öhm, was genau willst du eigentlich?
Du willst doch wohl nicht, dass wir für dich dein Programm ändern, so dass es dir wieder gefällt?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Devilkevin
aka Kerstin


Anmeldungsdatum: 11.11.2004
Beiträge: 2532
Wohnort: nähe Mannheim

BeitragVerfasst am: 30.03.2005, 23:57    Titel: Antworten mit Zitat

Ich will keinen kommpletten Code oder so haben, ich will einfach nur n paar Vorschläge mit den Augen rollen - den kommpletten Code für das Programm bekomme ich dann schon selbst hin - Keine Sorge zwinkern

Tomtitoms Signatur hat Folgendes geschrieben:

Thurgor: Wo ist mein Stift?
Baum: Hab ich gegessen.



Denken --- dann --> Posten Kumpel Daumen rauf!
_________________
www.piratenpartei.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Tomtitom



Anmeldungsdatum: 20.09.2004
Beiträge: 308

BeitragVerfasst am: 31.03.2005, 10:40    Titel: Antworten mit Zitat

Du scheinst überhaupt nicht verstanden zu haben, was ich dir überhaupt mitteilen wollte - woher sollen wir wissen, was dir gefällt?
Ich finde diesen Thread keinen Deut besser wie 'Als Hausaufgabe sollen wir in QB was proggen, mir fällt nichts ein - macht mal!'

Devilkevin hat Folgendes geschrieben:
Tomtitoms Signatur hat Folgendes geschrieben:

Thurgor: Wo ist mein Stift?
Baum: Hab ich gegessen.

Denken --- dann --> Posten Kumpel Daumen rauf!


Und was das bedeuten soll entzieht sich völlig meiner Kenntnis ugly!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
jb



Anmeldungsdatum: 14.01.2005
Beiträge: 2010

BeitragVerfasst am: 31.03.2005, 11:01    Titel: Antworten mit Zitat

Also erstmal solltest du Passwort schreiben. mit den Augen rollen

Bei der Überprüfung würde ich ohne externe Datei arbeiten.
Falls du das aber möchtest, würde ich das so machen:
Code:

OPEN "C:\PASS.TXT" FOR INPUT AS #1
 LINE INPUT #1, Eingabe$
CLOSE #1

Ohne irgendein INPUT$().

Das GOTO kannst du dir auch sparen. Schreib alle Sachen die unter den
Labeln stehen hinter die Bedingungen und arbeite mit END IF.

jb
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Devilkevin
aka Kerstin


Anmeldungsdatum: 11.11.2004
Beiträge: 2532
Wohnort: nähe Mannheim

BeitragVerfasst am: 31.03.2005, 12:09    Titel: Antworten mit Zitat

Wie soll ich den ohne eine externe .txt Datei arbeiten neutral ?
Irgendwo muss das Password ja hinterlegt sein. Man könnte vllt. ein schon vorhandenes Password auslesen (wen das möglich wäre z.b. aus der Kennwort Liste vom Internet Explorer) aber das scheint mir zu kompliziert zu sein.

Ihr wisst ja: Windows XP + QBasic R.I.P.
Ach ja: Ich schreibe Passwort immer mit d zwinkern
_________________
www.piratenpartei.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
jb



Anmeldungsdatum: 14.01.2005
Beiträge: 2010

BeitragVerfasst am: 31.03.2005, 12:30    Titel: Antworten mit Zitat

Devilkevin hat Folgendes geschrieben:

Wie soll ich den ohne eine externe .txt Datei arbeiten ?

Indem du in den Quellcode z.B.
Code:

Eingabe$ = "Das_Passwort"

schreibst geschockt geschockt mit den Augen rollen ......

Wenn du aber unbedingt eine .TXT-Datei benutzen willst, würde ich ihr einen
nichtssagendenderen Namen geben, z.B. "Einkaufsliste.TXT" zwinkern ....

jb
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Xolios
aka Ray


Anmeldungsdatum: 07.12.2004
Beiträge: 589
Wohnort: Wildeshausen

BeitragVerfasst am: 31.03.2005, 12:34    Titel: Antworten mit Zitat

Hallo.

Ich würde Sie in den Windows Ordner legen.
z.B. als Pwia.mni
Nicht txt da jeder noob sie öffnen könnte.
Einen namen der nie viel sagt wäre besser.

Gruß
Ray
_________________
www.ray-earth.de
Anm.: Neue ICQ
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen Yahoo Messenger MSN Messenger
jb



Anmeldungsdatum: 14.01.2005
Beiträge: 2010

BeitragVerfasst am: 31.03.2005, 12:40    Titel: Antworten mit Zitat

Oder als .DLL abspeichern, z.B. PA.DLL = Passwort-Abfrage.
Da murkst bestimmt keiner dran rum, vor allen Dingen,
da Windows ne Warnung ausspuckt, wenn man sie öffnen will.... lachen

jb
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Xolios
aka Ray


Anmeldungsdatum: 07.12.2004
Beiträge: 589
Wohnort: Wildeshausen

BeitragVerfasst am: 31.03.2005, 12:42    Titel: Antworten mit Zitat

Hallo.

Mein lieblingsdateiname ist immer noch:
windows.dll
lachen lachen lachen

Gruß
Ray

Mein 100. Beitrag...
endlich^^
_________________
www.ray-earth.de
Anm.: Neue ICQ


Zuletzt bearbeitet von Xolios am 31.03.2005, 12:47, insgesamt einmal bearbeitet
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen Yahoo Messenger MSN Messenger
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 31.03.2005, 12:42    Titel: Antworten mit Zitat

Hallo.

Die JBsche Methode hat allerdings den Nachteil, dass das Passwort nicht geändert werden kann und mit einem Hexeditor oder sogar dem Notepad gelesen werden kann. Wenn schon in den Quellcode dann richtig:
Code:
CLS
DIM Zeichen(3) AS INTEGER
Zeichen(0) = 80
Zeichen(1) = 105
Zeichen(2) = 111
Zeichen(3) = 120
FOR i% = 0 TO UBOUND(Zeichen)
 If i% MOD 2 = 0 OR i% = 0 THEN faktor% = 4 ELSE: faktor% = -4
 PRINT CHR$(Zeichen(i%)+faktor%);
NEXT i%
PRINT: PRINT "Das war dein Passwort!":SLEEP:END

Ist zwar auch knackbar, aber besser, als das Passwort direkt in den Code zu schreiben. Die Methode kann man natürlich noch verfeinern. Dem Aufwand sind da kaum Grenzen gesetzt... zwinkern

Ihr könntet die Textdatei aber auch einfach verschlüsseln und bei Nichtvorhandensein der Datei vernichtet sich das Programm selbst. happy

Bei einer DLL solltet ihr allerdings ein SPACE$(16384) oder sowas mit in die Datei schreiben. Eine 10 Byte große DLL ist auffällig... zwinkern

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
jb



Anmeldungsdatum: 14.01.2005
Beiträge: 2010

BeitragVerfasst am: 31.03.2005, 12:43    Titel: Antworten mit Zitat

@Sebastian: Spielverderber Zunge rausstrecken zwinkern

jb
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Devilkevin
aka Kerstin


Anmeldungsdatum: 11.11.2004
Beiträge: 2532
Wohnort: nähe Mannheim

BeitragVerfasst am: 31.03.2005, 12:45    Titel: Antworten mit Zitat

Oh ja gute Idee - .dll - das hört sich schon so gefährlich an grinsen
Das Password im Quellcode abzulegen is ja realtiv "Dumm", der Benutzer soll ja nicht ewig lange im Quellcode rumwühlen wen er sein Password ändern will.

Ich dachte das ich vllt. ne Pfadabfrage mache, dann kann man die Datei irgendwo in nem Uralt Ordner vergraben lächeln

Code:

PRINT "Geben sie den Genauen Pfad der Datei an ! (z.b. C:\Beispiel.txt)"
INPUT "Pfad: ", pfad$
OPEN "pfad$" FOR INPUT AS 1
datei$ = INPUT$(CINT(LOF(1)), 1)
CLOSE 1


So, natürlich funktinoniert das mal wieder nicht peinlich
Die Datei wird nicht gefunden Kopf schütteln
_________________
www.piratenpartei.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 31.03.2005, 12:47    Titel: Antworten mit Zitat

Das liegt an "pfad$". Wer hat schon eine C:\...\QBASIC\pfad$ ?
Anführungszeichen weg, dann wird's funktionieren... lächeln
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Devilkevin
aka Kerstin


Anmeldungsdatum: 11.11.2004
Beiträge: 2532
Wohnort: nähe Mannheim

BeitragVerfasst am: 31.03.2005, 12:55    Titel: Antworten mit Zitat

Das mit der "Programmsebstvernichtung" erinnert mich an die Schulhof Hacker Storys (Ja, und gestern hab ich voll den krassen NT-Server gestartet, da hab ich EBay Gehackt, und jetzt ist Ebay auf meinem Server, und und und ... ja und gester habe ich voll den geilen Virus geschickt bekommen, aber dann habe ich den Virus noch besser gemacht und zurück geschickt) grinsen

wewewe.hackers.ag "Tippen sie einfach OK ein, und sie erhalten zuganng zu unseren SMS Bomben, und Trojanern" happy Hach immer wieder lustig ...
_________________
www.piratenpartei.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 31.03.2005, 13:48    Titel: Antworten mit Zitat

Hallo.

Das ist doch keine Fiction!

== > Selbstzerstörung

Du liest gemäß MonsterFAQ den Dateinamen der eigenen EXE Datei aus und hast ihn sagen wir in datei$.
Dann machst du
Code:
OPEN datei$ FOR BINARY ACCESS WRITE AS #1
dump$ = "Bla!"
FOR i& = 1 TO 10000
 PUT #1,,dump$
NEXT i&
CLOSE #1


Schon hat sich die EXE Datei selbst mit lauter "Bla!"s überschrieben.


== > NT Server aufsetzen

Was soll da so heftig dran sein? Das hab ich x mal "dienstlich" gemacht und bei mir zu Hause auch schon. Windows 2000 Advanced Server übrigens auch.

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Devilkevin
aka Kerstin


Anmeldungsdatum: 11.11.2004
Beiträge: 2532
Wohnort: nähe Mannheim

BeitragVerfasst am: 31.03.2005, 14:11    Titel: Antworten mit Zitat

Sebastian hat Folgendes geschrieben:


== > NT Server aufsetzen

Was soll da so heftig dran sein? Das hab ich x mal "dienstlich" gemacht und bei mir zu Hause auch schon. Windows 2000 Advanced Server übrigens auch.

Viele Grüße!
Sebastian


Naja war nur ein Beispiel, aber diese ganzen Schulhof Hacker haben meist gar keine Ahnung von sowas, sondern labern einfach nur mit irgendwelchen "Fachbegriffen" (z.b. Windows NT Server zwinkern).
Windows NT 4.0 Boot Diskette einlegen ist nicht Schwer zwinkern - weis ich auch zwinkern
_________________
www.piratenpartei.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 31.03.2005, 14:48    Titel: Antworten mit Zitat

Naja, das Aufsetzen eines Servers ist schon etwas komplizierter als Windows 98 zu installieren. Du willst den Server ja schließlich auch nicht nur als Arbeitscomputer für Word nutzen, sondern er soll bestimmte Dienste bereitstellen, die du erst einrichten bzw. einstellen musst. lächeln
Außerdem musst du bei NT noch einiges beachten und mit Treibern für Massenspeicher und RAID-Controller gibt's da beim Installieren auch oft Probleme.... neutral
Aber ich kenne die Thematik, die du beschreibst. Wir haben in unserer Klasse auch einen Hirni, der sich ganz toll vorkommt, weil er irgendein Ballerspiel installieren kann oder sich mit einem CMS eine Homepage zusammenklicken kann... peinlich
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Crack23



Anmeldungsdatum: 06.02.2005
Beiträge: 3
Wohnort: Berlin

BeitragVerfasst am: 31.03.2005, 18:28    Titel: Antworten mit Zitat

Komisch dass noch keiner draufgekommen ist: Passwort einfach verschlüsseln. Die ganzen Sachen mit "als DLL speichern" usw. kannst du ja trotzdem machen, aber eine einfache Verschlüsselung schreckt schon einen großen Teile der User ab. ROT13 ist z.B. eine schnell zu implementierende. Einfach den ASCII-Code jedes Zeichens mit 13 addieren. Zum Entschlüsseln mit 13 subtrahieren.
_________________
Coming soon: Crack23.de.vu

"Hey, was hast du mit der Welt gemacht? ... Abgeschaltet!" - The 13th Floor

"Der Programmierer ist ein Schöpfer von Universen, denen er allein Gesetze gibt [...]." - Joseph Weizenbaum
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 31.03.2005, 18:41    Titel: Antworten mit Zitat

Sebastian hat Folgendes geschrieben:
Ihr könntet die Textdatei aber auch einfach verschlüsseln...

Hab ich auch schon vorgeschlagen. lächeln
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic. Alle Zeiten sind GMT + 1 Stunde
Gehe zu Seite 1, 2  Weiter
Seite 1 von 2

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz