Скачать файл *.torrent

[GranDDaY]

мне надо как-нибудь добавить в саму форму торрент файл и чтобы он при нажатии на кнопку скачивался на рабочий стол.
какой код нужно прописать для этого, если я к примеру заранее положил в форму 111.torrent?
если можно то оставте свой номер Icq или логин в skype
Заранее благодарен.

[FireFenix]

какой код нужно прописать для этого

Для этого нужно понять основы программирования, и прочитать хотябы 1 книгу по языку программирования (ЯП) и работы ЯП с файловой системой

[GranDDaY]

так ты можешь написать , что надо прописать к button1 чтобы началось скачивание к примеру music.torrent ????

[FireFenix]

так ты можешь написать , что надо прописать к button1 чтобы началось скачивание к примеру music.torrent ????

Почему я должен за тебя писать программу?
Наводку я дал выше... Если нужен код - топай в раздел Работа! Там тебе всё что угодно напишут...

[fist100]

так ты можешь написать , что надо прописать к button1 чтобы началось скачивание к примеру music.torrent ????

Извини, но это слишком сложно для нас

[GranDDaY]

Извини, но это слишком сложно для нас

Для вас может и да, но для FierFenix - не думаю...

[Lancer2404]

У тебя будет торр файл уже внутри проги?

[fist100]

Ладно так и быть даю на водку

Код: Выделить всё

Imports System.IO
Imports System.Net

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim NameOfIt As String = Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\Downloaded.torrent"
            Try
                If IO.File.Exists(NameOfIt) = True Then
                    IO.File.Delete(NameOfIt)
                    My.Computer.Network.DownloadFile(textbox1.text, NameOfIt)
                Else
                    My.Computer.Network.DownloadFile(textbox1.text, NameOfIt)
                End If
            Catch ex As Exception
            End Try
end sub

Вот как -то так

[FireFenix]

Ладно так и быть даю на водку

На торрентах обычно скачивание только после регистрации
И этот пример плавно вытекает в использование WebHttpRequest, WebHttpResponse + Cookie, для которых нужно читать HTTP взаимодействие

[GranDDaY]

у меня лежит торрент файл уже в программе, мне надо сделать так, чтобы этот торрент файл просто открылся.

[GranDDaY]

Ладно так и быть даю на водку
КОД: ВЫДЕЛИТЬ ВСЁ
Imports System.IO
Imports System.Net

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim NameOfIt As String = Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\Downloaded.torrent"
            Try
                If IO.File.Exists(NameOfIt) = True Then
                    IO.File.Delete(NameOfIt)
                    My.Computer.Network.DownloadFile(textbox1.text, NameOfIt)
                Else
                    My.Computer.Network.DownloadFile(textbox1.text, NameOfIt)
                End If
            Catch ex As Exception
            End Try
end sub


Вот как -то так

не работает, ни какого эффекта... (наверное на водку не хватило)
Вот само место где лежит файл торрент

а вот та кнопка к которой надо прописать чтобы программа при нажатии открывала этот торрент файл ( просто открывала (тоже самое если кликнуть два раза по какой либо программе, она же откроется, ну вот типа этого эффекта мне и надо)

[Joo]

так ты можешь написать , что надо прописать к button1 чтобы началось скачивание к примеру music.torrent ????

Не, ну это вообще наглость.

Ладно так и быть даю на водку

И мне, и мне на водку!!!

у меня лежит торрент файл уже в программе

Это где он у тебя в программе лежит???

[GranDDaY]

первая картинка предыдущего сообщения

[Lancer2404]

Тогда берешь извлекаешь из ресурсов торр(Get temp file name)Потом запускаешь.Shell(tmpfile).PS.Код ща не могу написать с телефона.если че стучи в аську 5577202

[Денис]

Парни, хорош пиратам помогать! Вы что не видите?

[GranDDaY]

Парни, хорош пиратам помогать! Вы что не видите?

Ты конечно извини, но где ты видишь тут пиратство?
если ты называешь меня пиратом из за того что я щас делаю, то напиши тогда это на сайт tfile.ru или на какой либо другой сайт с torrent файлами.

[FireFenix]

Парни, хорош пиратам помогать! Вы что не видите?

Ты сотри, они ещё thepiratebay переплюнут

По теме:
* Ресурс ->MemoryStream
* FileStream -> Создать файл *.torrent на диске
* MemoryStream.CopyTo(FileStream)
* Shell(файл *.torrent на диске)

[GranDDaY]

По теме:
* Ресурс ->MemoryStream
* FileStream -> Создать файл *.torrent на диске
* MemoryStream.CopyTo(FileStream)
* Shell(файл *.torrent на диске)

чо? Оо

[Joo]

чо? Оо

Поясняю, он говорит шел бы ты в раздел работа и там тебе за некоторою сумму уёв все напишут.

[GranDDaY]

как из textbox1.backcolor = color.yellow сделать при нажатии кнопки вот такой цвет 255; 255; 192
Вот, я написал так

Код: Выделить всё

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Form1.RichTextBox1.BackColor = 255; 255; 192
End sub

Но он не работает, выдает ошибки , а мне нужен именно этот цвет.
что делать?

[Viper]

что делать?

Прочитать хотя бы одну книгу по программированию, изучить синтаксис VB.NET и Framework.

[Viper]

По теме:
* Ресурс ->MemoryStream
* FileStream -> Создать файл *.torrent на диске
* MemoryStream.CopyTo(FileStream)
* Shell(файл *.torrent на диске)

чо? Оо

Еще один ответ в этом же духе и тема будет закрыта, а вопрошающий получит предупреждение.

[GranDDaY]

Прочитать хотя бы одну книгу по программированию, изучить синтаксис VB.NET и Framework.

АААААААААААААА... да прочитаю я, скажите мне решение этой проблемы

[Viper]

Прочитать хотя бы одну книгу по программированию, изучить синтаксис VB.NET и Framework.

АААААААААААААА... да прочитаю я, скажите мне решение этой проблемы

После прочтения или в форум Работа.

[GranDDaY]

GranDDaY писал(а):
FireFenix писал(а):
По теме:
* Ресурс ->MemoryStream
* FileStream -> Создать файл *.torrent на диске
* MemoryStream.CopyTo(FileStream)
* Shell(файл *.torrent на диске)

чо? Оо
Еще один ответ в этом же духе и тема будет закрыта, а вопрошающий получит предупреждение.

Я что-то не понял, а что я такого написал не приличного? вроде ничего пошлого, и это просто вопрос. Чо = что.

[Viper]

Я что-то не понял, а что я такого написал не приличного? вроде ничего пошлого, и это просто вопрос. Чо = что.

На этом форуме приветствуется грамотность. Заодно намекаю, что пререкания с модератором также не способствуют улучшению кармы.

[GranDDaY]

На этом форуме приветствуется грамотность. Заодно намекаю, что пререкания с модератором также не способствуют улучшению кармы.

хорошо, mr. модератор, подскажите мне пожалуйста, почему этот код
... RGB ( Red:= 255, Green:= 255, Blue:= 192 ) as integer
Не рабеоает?

[FireFenix]

На этом форуме приветствуется грамотность. Заодно намекаю, что пререкания с модератором также не способствуют улучшению кармы.

хорошо, mr. модератор, подскажите мне пожалуйста, почему этот код
... RGB ( Red:= 255, Green:= 255, Blue:= 192 ) as integer
Не рабеоает?

1) Потому что ты не прочитал книгу
2) Потому что ты даже не воспользовался поисковиком (гуглом, яндексом) для поиска решения
3) Потому что ты не слушаешь, что я тебе уже 100 раз говорю и другие люди тоже
4) Потому что такой синтаксис невозможен

Код: Выделить всё

RichTextBox1.BackColor = Color.FromArgb(255, 255, 192)

[GranDDaY]

1) Потому что ты не прочитал книгу
2) Потому что ты даже не воспользовался поисковиком (гуглом, яндексом) для поиска решения
3) Потому что такой синтаксис невозможен

1. Это да, но собирался
2. Пользовался гуглом, ничего полезного не нашёл
3. Не знал, наверное из за первого (не читал книгу)

[Viper]

2. Пользовался гуглом, ничего полезного не нашёл

Не верю.