Español
Eingangshalle

Fehler con password/pwd$/encode64/decode64

 
- Página 1 -



Walter
¡Hola!
Posesiones mi liebe Not con el Ver- y Entschlüsseln mittels password, pwd$, encode64 y decode64.
Lo kommt esta no siempre el heraus, Yo einfülle...
Kurz dijo: Lo entstehen gelegentlich falsche Buchstaben.
Ob el de pwd$ kommt oder de en-/decode, kann Yo por desgracia, no erkennen. Bin ya froh, media Code en una funktionierendes Ejemplo eindampfen a puede.
Hier mein Code, el en el 1. messagebox ya 2 Fehler en el Ver-/Entschlüsseln mittels password 1 zeigt (Hälxte en lugar de Hälfte; en), en el 2. messagebox, mittels password 0 una weitern (s}hwieriger en lugar de schwieriger).
' Fehler con password/pwd$/encode64/decode64
declarar orig$,enc$,dec$
'Testsatz
orig$= "Zum Test el Verschlüsselung benötigt uno viel Geduld! El Hälfte el Anstrengung es en. A Einstimmung en el zweite son hier ya 2 Fehler a sehen (Hälfte y en). Auch con password 0 hay Fehler, aber todavía schwieriger a reproduzieren!"
' Teil 1: Mit password 1
password 1,"wAs du hEUTE bekommst, geHört DIiR aUch morGEn todavía!"
'Testsatz verschlüsseln y otra vez entschlüsseln
enc$=__iniencode(orig$)
dec$=__inidecode(enc$)
messagebox("Teil 1 - con password 1\n\nOriginalsatz:\n"+orig$+"\n\nVer- y entschlüsselt:\n"+ dec$,"",0)
' Teil 2: Mit password 0
password 0,"wAs du hEUTE bekommst, geHört DIiR aUch morGEn todavía!"
'Testsatz verschlüsseln y otra vez entschlüsseln
enc$=__iniencode(orig$)
dec$=__inidecode(enc$)
messagebox("Teil 2 - con password 0\n\nOriginalsatz:\n"+orig$+"\n\nVer- y entschlüsselt:\n"+ dec$,"",0)

proc __iniEncode

    parámetros cadena s
    declarar a$
    a$=pwd$(s)
    a$=translate$(a$,"=","#")
    a$=encode64(a$)
    volver a$

ENDPROC

proc __iniDecode

    parámetros cadena s
    declarar d$
    d$=decode64(s)
    d$=translate$(d$,"#","=")
    d$=pwd$(d$)
    volver d$

ENDPROC

 
03.11.2019  
 



« Dieser Contribución wurde como Solución gekennzeichnet. »


Georg
Teles

Bueno Morgen,

Usted hast una pequeña Denkfehler en el Reihenfolge el Kodierung:

En Encode muss Translate NACH el encode64 posición.
Beim Decode muss Translate VOR el decode64 posición.

Hier dein Code korrigiert:
' Fehler con password/pwd$/encode64/decode64
declarar orig$,enc$,dec$
'Testsatz
orig$= "Zum Test el Verschlüsselung benötigt uno viel Geduld! El Hälfte el Anstrengung es en. A Einstimmung en el zweite son hier ya 2 Fehler a sehen (Hälfte y en). Auch con password 0 hay Fehler, aber todavía schwieriger a reproduzieren!"
' Teil 1: Mit password 1
password 1,"wAs du hEUTE bekommst, geHört DIiR aUch morGEn todavía!"
'Testsatz verschlüsseln y otra vez entschlüsseln
enc$=__iniencode(orig$)
dec$=__inidecode(enc$)
messagebox("Teil 1 - con password 1\n\nOriginalsatz:\n"+orig$+"\n\nVer- y entschlüsselt:\n"+ dec$,"",0)
' Teil 2: Mit password 0
password 0,"wAs du hEUTE bekommst, geHört DIiR aUch morGEn todavía!"
'Testsatz verschlüsseln y otra vez entschlüsseln
enc$=__iniencode(orig$)
dec$=__inidecode(enc$)
messagebox("Teil 2 - con password 0\n\nOriginalsatz:\n"+orig$+"\n\nVer- y entschlüsselt:\n"+ dec$,"",0)

proc __iniEncode

    parámetros cadena s
    declarar a$
    a$=pwd$(s)
    a$=encode64(a$)
    a$=translate$(a$,"=","#")
    volver a$

ENDPROC

proc __iniDecode

    parámetros cadena s
    declarar d$
    d$=translate$(s,"#","=")
    d$=decode64(d$)
    d$=pwd$(d$)
    volver d$

ENDPROC


Nu dürfte alles correcto traducido voluntad

Grüße
 
TC-Programming [...] 
XProfan 10.0 - XProfan X2 - XProfan X3 - XProfan X4
10.11.2019  
 




E.T.
Wenn uno a$=translate$(a$,"=","#")  o. d$=translate$(d$,"=","#")  auskommentiert, klappts
 
XProfan X3
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1), Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...
03.11.2019  
 




E.T.
Ah sí, de el Ayuda a Pwd$(S)  :


...
Lo kann sin embargo vorkommen, dass en el String por el Umwandlung no druckbare Sonderzeichen entstehen (como z.B,. el Zeilenende-Signo), sodass una Nutzung dieser Cuerdas en INI-Archivos oder Textdateien no empfehlenswert es. In binären Archivos kann él problemlos gespeichert voluntad.
...


Yo denke, du veränderst con el translate  esta (Binär-) String derartig, el entonces simplemente ya beim decode64  falsche Signo entstehen, welche entonces encode64  ya correcto "übersetzt", allerdings ya "falsch gefüttert" se.

Was se el translate überhaupt bewirken ??
Erschließt se me ahora no así bastante...

Hab algo como auch ya veces gemacht:
Mit pwd$  verschlüsselt, con decode64  otra vez "verwurstelt" y schreibbar para una .ini gemacht, y todos entonces sauber en uno .INI-Expediente abgelegt. Nie Problemas gehabt beim "zuückverwursteln"
 
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1), Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...
04.11.2019  
 




Walter
"nicht druckbare Sonderzeichen" - por lo tanto es sí.
Das Konzept stammt no de me, pero de hier: [...] 
Soweit Yo verstanden habe, se el translate$ el encode-Ende-Signo "=", el por pwd$ entstehen podría, en una harmloses Signo traducir, como sonst encode abbricht.
Und nachher otra vez zurück.
Gracias jedenfalls!
Yo probier sólo ahora veces sin translate$, si en media "normalen Texten" funktioniert. Ist sólo siempre ungewiss, si entonces irgendwann doch una "böse" Konstellation auftritt...
 
04.11.2019  
 




Georg
Teles

Bueno Morgen,

Usted hast una pequeña Denkfehler en el Reihenfolge el Kodierung:

En Encode muss Translate NACH el encode64 posición.
Beim Decode muss Translate VOR el decode64 posición.

Hier dein Code korrigiert:
' Fehler con password/pwd$/encode64/decode64
declarar orig$,enc$,dec$
'Testsatz
orig$= "Zum Test el Verschlüsselung benötigt uno viel Geduld! El Hälfte el Anstrengung es en. A Einstimmung en el zweite son hier ya 2 Fehler a sehen (Hälfte y en). Auch con password 0 hay Fehler, aber todavía schwieriger a reproduzieren!"
' Teil 1: Mit password 1
password 1,"wAs du hEUTE bekommst, geHört DIiR aUch morGEn todavía!"
'Testsatz verschlüsseln y otra vez entschlüsseln
enc$=__iniencode(orig$)
dec$=__inidecode(enc$)
messagebox("Teil 1 - con password 1\n\nOriginalsatz:\n"+orig$+"\n\nVer- y entschlüsselt:\n"+ dec$,"",0)
' Teil 2: Mit password 0
password 0,"wAs du hEUTE bekommst, geHört DIiR aUch morGEn todavía!"
'Testsatz verschlüsseln y otra vez entschlüsseln
enc$=__iniencode(orig$)
dec$=__inidecode(enc$)
messagebox("Teil 2 - con password 0\n\nOriginalsatz:\n"+orig$+"\n\nVer- y entschlüsselt:\n"+ dec$,"",0)

proc __iniEncode

    parámetros cadena s
    declarar a$
    a$=pwd$(s)
    a$=encode64(a$)
    a$=translate$(a$,"=","#")
    volver a$

ENDPROC

proc __iniDecode

    parámetros cadena s
    declarar d$
    d$=translate$(s,"#","=")
    d$=decode64(d$)
    d$=pwd$(d$)
    volver d$

ENDPROC


Nu dürfte alles correcto traducido voluntad

Grüße
 
TC-Programming [...] 
XProfan 10.0 - XProfan X2 - XProfan X3 - XProfan X4
10.11.2019  
 




Walter
Sí, como tener Yo falso überlegt.

En encode es en el Ayuda:
todos Werte voluntad en máximo 64 Signo dargestellt:
A - Z, a - z, 0 - 9 y + sowie /. Als Endekennzeichen dient el =.

Das translate$ es offenbar dazu como, dass el = como Endezeichen vom encode no con el = zwischen Eintragsschlüssel y Eintrag en el INI kollidiert.

Passt! Vielen Dank!
 
10.11.2019  
 



Respuesta


Título del Tema, max. 100 Signo.
 

Systemprofile:

Kein Systemprofil creado. [anlegen]

XProfan:

 Contribución  Font  Smilies  ▼ 

Bitte registro en una Contribución a verfassen.
 

Tema opciones

547 Views

Untitledvor 0 min.
Thomas Zielinski vor 23 Tagen
DB HoKi28.02.2020
ByteAttack07.02.2020
Sascha Haak26.01.2020
Más...

Themeninformationen

Dieses Thema ha 3 subscriber:

Walter (3x)
E.T. (2x)
Georg Teles (1x)


AGB  |  Chat  |  Política de Privacidad  |  Descargar  |  Eingangshalle  |  Ayuda  |  Pie de imprenta  |  Mart  |  Support  |  Búsqueda

Ein Projekt aller XProfan, el lo son!


Mi XProfan
Privado Noticias
Eigenes Ablageforum
Temas-Merkliste
Eigene Beiträge
Eigene Temas
Zwischenablage
Cancelar
 Deutsch English Français Español Italia
Traducciones

Política de Privacidad


Wir uso Cookies sólo como Session-Cookies wegen el technischen Notwendigkeit y en uns hay no Cookies de Drittanbietern.

Wenn du hier en unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung de Informationen en unseren Cookies en XProfan.Net a.

Weitere Informationen a unseren Cookies y dazu, como du el Kontrolle darüber behältst, findest du en unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Yo möchte no Cookie