aina encruptin tekemisen jälkeen huomaan purkamisen olevan mahdotonta! 
Minkälaista tartteisit? Mähän linkitin yhenlaiseen.nevssons wrote:ärsyttää toi cryppauksen tekeminen!
Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)
CB:n ohjeissahan on esimerkki kryptauskomentojen käytöstä.nevssons wrote:Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)
Code: Select all
'encrypt a funny joke to root C:
Encrypt "Media\Example.txt","C:\classified.dat","ILOOVEB"
Print "Look at your root C:"
WaitKey
'decrypt the file so you can read it
Decrypt "C:\classified.dat","c:\decrypted.txt","ILOOVEB"
Print "Look at your root C: again..."
WaitKey
'NOW.. compare the two files by opening both to Notepad No yksinkertaisen cryptauksen saat tehtyä helposti. Muuta kaikki kirjaimet ascii arvoksi ja siteen vaikka kerrot sen kolmella ja jaat kahdella. Eli sis:nevssons wrote:ärsyttää toi cryppauksen tekeminen!
Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)
Code: Select all
function crypt(txt$)
For i=1 to len(txt$)
x=asc(mid(txt$,i,1))
palauta=x*3/2
return palauta
endfunctionsalasnalla! sulla oli jotain outoja numeroita!Grandi wrote:Minkälaista tartteisit? Mähän linkitin yhenlaiseen.nevssons wrote:ärsyttää toi cryppauksen tekeminen!
Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)
En pyytänyt käyttö esimerkkiäregalis wrote:CB:n ohjeissahan on esimerkki kryptauskomentojen käytöstä.nevssons wrote:Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)Code: Select all
'encrypt a funny joke to root C: Encrypt "Media\Example.txt","C:\classified.dat","ILOOVEB" Print "Look at your root C:" WaitKey 'decrypt the file so you can read it Decrypt "C:\classified.dat","c:\decrypted.txt","ILOOVEB" Print "Look at your root C: again..." WaitKey 'NOW.. compare the two files by opening both to Notepad
Kyllä niitä ässiä löytyy kun oikein kaivelee!nevssons wrote:salasnalla! sulla oli jotain outoja numeroita!Grandi wrote:Minkälaista tartteisit? Mähän linkitin yhenlaiseen.nevssons wrote:ärsyttää toi cryppauksen tekeminen!
Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)
En pyytänyt käyttö esimerkkiäregalis wrote:CB:n ohjeissahan on esimerkki kryptauskomentojen käytöstä.nevssons wrote:Oisko jossain esimerkkiä encryptaus funktiosta? (salasanalla)Code: Select all
'encrypt a funny joke to root C: Encrypt "Media\Example.txt","C:\classified.dat","ILOOVEB" Print "Look at your root C:" WaitKey 'decrypt the file so you can read it Decrypt "C:\classified.dat","c:\decrypted.txt","ILOOVEB" Print "Look at your root C: again..." WaitKey 'NOW.. compare the two files by opening both to Notepad
pyysin esimerkkiä siitä millainen cryptaus function pitäis olla!
Hihhei! mun 50. viesti! Hyvästi newcommer nimitys!
Aina löytyy joku vika!Okei... Sama jutu kun yritin käyttää cb:n cryptiä, otan asiasta selvääHarakka wrote:Ei toimi ainakaan minulla... Ohjelma ei tallenna tekstiä ollenkaan (tuloksena tyhjiä tiedostoja).
EDIT: ja kun jonkun tiedoston avaa, ei tekstikenttää tyhjennetä ennen ladatun tekstin lisäämistä
En tota lähettäessäni ajatellu koin paljon yhtään mitää joten ongelmia kyllä ilmeneekoodaaja wrote:Myös oikeat DLL:t olisi kohteliasta laittaa mukaan, itselläni valittaa että on wanha versio cbAPI.dll:stä, ja mietipä sitten ihmisiä joilta moinen puuttuu kokonaan.