Facebook Chat Code Generator - Wie wird dieser Code erstellt ?

  • VB.NET

    Facebook Chat Code Generator - Wie wird dieser Code erstellt ?

    Hallo miteinander ich möchte euch mal wieder um Hilfe bitten...
    Und zwar möchte ich mir einen - Facebook Chat Code Generator - machen .
    Wie man Bilder einlist und als Bit abspeichert ist klar aber ????
    Leider weis ich nicht genau wie dieser Code genau so entsteht.

    VB.NET-Quellcode

    1. ' DIES IST KEIN VB CODE ! SO SOLL DAS BILD GEWANDELT WERDEN !
    3. [[258968244165876]][[286666501379430]][[262520713809098]][[159049157536013]][[307904395916212]]
    4. [[225447050864310]][[209926462425564]][[138411019605305]][[221670374577056]][[154671737968862]]
    5. [[138007062977844]][[291747794194724]][[122952454488304]][[337561022923016]][[288878907831075]]
    6. [[240630206008013]][[264223330304357]][[319462458078703]][[239286912807413]][[288721814513254]]
    7. [[265575850170635]][[345354905481875]][[209004679185391]][[259785247417432]][[159480014157666]]
    8. [[267428346644787]][[239034746168540]][[350046018344350]][[209260572491236]][[198316980259626]]
    9. [[310959705610393]][[214054278676095]][[200638253359905]][[334455703231303]][[158066514298630]]



    1. Versuch:

    VB.NET-Quellcode

    1. Public Class Form1
    3. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    4. Dim a(3126) As Byte
    5. Dim i As Integer
    6. Dim l As Integer
    7. Dim s, ds As String
    8. s = ""
    9. l = 3125
    10. a = My.Computer.FileSystem.ReadAllBytes("C:\Users\zeus\Desktop\test b\1.jpg")
    11. For i = 0 To l ' Umwandeln in Hex
    12. ds = Hex(a(i))
    13. If Len(ds) = 1 Then ds = "0" & ds
    14. s &= ds
    15. Next
    16. My.Computer.FileSystem.WriteAllText("C:\Users\zeus\Desktop\test b\1.txt", s, False)
    17. End
    18. End Sub
    20. End Class



    Vielleicht weis ja hier jemand irgend was :whistling:

    Hier kann man sich so ein Tool anschauen um zu sehen was gemeint ist .
    youtube.com/watch?v=lghOh_djR-Y

    Vielen Dank ^^

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „TVX“ ()

Facebook