Btukfyl

Dim fb As FacebookClient = New FacebookClient(TextBox3.Text)





Dim attachementPath As String = ListBox1.SelectedItem



Dim result As Object = fb.Post("me/photos", New With {

                                   Key .message = "0",

                                   Key .file = New FacebookMediaObject() With {

                                   .ContentType = "image/jpeg",

                                   .FileName = Path.GetFileName(attachementPath)}.SetValue(File.ReadAllBytes(attachementPath)),

                                   Key .published = False,

                                   Key .scheduled_publish_time = "22.11.2018 00:11"})

Dim dictionary As Dictionary(Of String, Object) = New Dictionary(Of String, Object)()

Dim fb As FacebookClient = New FacebookClient(TextBox3.Text)





Dim attachementPath As String = ListBox1.SelectedItem



Dim result As Object = fb.Post("me/photos", New With {

                                   Key .message = "0",

                                   Key .file = New FacebookMediaObject() With {

                                   .ContentType = "image/jpeg",

                                   .FileName = Path.GetFileName(attachementPath)}.SetValue(File.ReadAllBytes(attachementPath)),

                                   Key .published = False,

                                   Key .scheduled_publish_time = "22.11.2018 00:11"})

Dim dictionary As Dictionary(Of String, Object) = New Dictionary(Of String, Object)()

Dim fb As FacebookClient = New FacebookClient(TextBox3.Text)





Dim attachementPath As String = ListBox1.SelectedItem



Dim result As Object = fb.Post("me/photos", New With {

                                   Key .message = "0",

                                   Key .file = New FacebookMediaObject() With {

                                   .ContentType = "image/jpeg",

                                   .FileName = Path.GetFileName(attachementPath)}.SetValue(File.ReadAllBytes(attachementPath)),

                                   Key .published = False,

                                   Key .scheduled_publish_time = "22.11.2018 00:11"})

Dim dictionary As Dictionary(Of String, Object) = New Dictionary(Of String, Object)()

Dim fb As FacebookClient = New FacebookClient(TextBox3.Text)





Dim attachementPath As String = ListBox1.SelectedItem



Dim result As Object = fb.Post("me/photos", New With {

                                   Key .message = "0",

                                   Key .file = New FacebookMediaObject() With {

                                   .ContentType = "image/jpeg",

                                   .FileName = Path.GetFileName(attachementPath)}.SetValue(File.ReadAllBytes(attachementPath)),

                                   Key .published = False,

                                   Key .scheduled_publish_time = "22.11.2018 00:11"})

Dim dictionary As Dictionary(Of String, Object) = New Dictionary(Of String, Object)()

Your Answer

StackExchange.ifUsing("editor", function () {
StackExchange.using("externalEditor", function () {
StackExchange.using("snippets", function () {
StackExchange.snippets.init();
});
});
}, "code-snippets");

StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "1"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});

function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});


}
});