Hey ![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
Ich habe ein Problem.. ich habe mich mal (mit ein paar tuts hier) versucht über die API von ncrypt.in da was zu verschlüsseln![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
aber das klappt nicht ganz... es kommt immer "foldername_missing" und ich weiss nicht warum... kann vielleicht mal jemand von euch drübergucken![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
So sieht das aus
in den Textboxen stand auch was !!!! da bin ich mir 1000 % sicher ![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
MfG
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
Ich habe ein Problem.. ich habe mich mal (mit ein paar tuts hier) versucht über die API von ncrypt.in da was zu verschlüsseln
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
aber das klappt nicht ganz... es kommt immer "foldername_missing" und ich weiss nicht warum... kann vielleicht mal jemand von euch drübergucken
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
VB.NET-Quellcode
- Imports System.Net
- Imports System.IO
- Imports System.Text
- Imports System.Web
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim Request As HttpWebRequest = CType(WebRequest.Create("http://ncrypt.in/api.php"), HttpWebRequest)
- Request.Method = "POST"
- Request.ContentType = "text/html; charset=utf-8"
- Dim Post As String = "auth_code=" & TextBox2.Text & "&foldername=" & TextBox1.Text & "&links=" & TextBox3.Text
- Dim byteArray() As Byte = Encoding.UTF8.GetBytes(Post)
- Request.ContentLength = byteArray.Length
- Dim DataStream As Stream = Request.GetRequestStream()
- DataStream.Write(byteArray, 0, byteArray.Length)
- DataStream.Close()
- Dim Response As HttpWebResponse = Request.GetResponse()
- DataStream = Response.GetResponseStream()
- Dim reader As New StreamReader(DataStream)
- Dim ServerResponse As String = reader.ReadToEnd()
- TextBox4.Text = ServerResponse
- reader.Close()
- DataStream.Close()
- Response.Close()
- End Sub
- End Class
So sieht das aus
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
MfG
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)