Компонент Microsoft Rich Textbox Control

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
begrusse
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 56
Зарегистрирован: 26.02.2008 (Вт) 8:24

Компонент Microsoft Rich Textbox Control

Сообщение begrusse » 07.05.2008 (Ср) 18:23

В Компоненте Microsoft Rich Textbox Control имеются ссылки вида:
ссылка1
ссылка2
ссылка3

допустим при нажатии на ComandButon загружается файл ссылка на который в Microsoft Rich Textbox Control как заставить функцию загрузки файла не пытаться загрузить файл по всему тексту а выделить ссылку 1?

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 07.05.2008 (Ср) 19:08

Чего?
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

begrusse
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 56
Зарегистрирован: 26.02.2008 (Вт) 8:24

Сообщение begrusse » 08.05.2008 (Чт) 3:13

Чего непонятного? в Microsoft Rich Textbox Control имеются ссылки формата

ссылка1
ссылка2
ссылка3

как сделать что бы файлы скачивались по порядку

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 08.05.2008 (Чт) 7:43

Чего?
Lasciate ogni speranza, voi ch'entrate.

begrusse
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 56
Зарегистрирован: 26.02.2008 (Вт) 8:24

Сообщение begrusse » 08.05.2008 (Чт) 11:50

Вот есть функция для скачивания файлов:

Код: Выделить всё
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Public Event ErrorDownload(FromPathName As String, ToPathName As String)
Public Event DownloadComplete(FromPathName As String, ToPathName As String)

Public Function DownloadFile(FromPathName As String, ToPathName As String)
If URLDownloadToFile(0, FromPathName, ToPathName, 0, 0) = 0 Then
DownloadFile = True
RaiseEvent DownloadComplete(FromPathName, ToPathName)
Else
DownloadFile = False
RaiseEvent ErrorDownload(FromPathName, ToPathName)
End If
End Function

Private Sub Command1_Click()
Call DownloadFile("http://site.com/1.exe", "c:\1.exe")
End Sub


Есть ссылки в Microsoft Rich Textbox Control 6.0 вида

ссылка1
ссылка2
ссылка3

как заставить качалку качать каждую ссылку по отдельности? 1,2,3 ?

iGrok
Артефакт VBStreets
Артефакт VBStreets
 
Сообщения: 4272
Зарегистрирован: 10.05.2007 (Чт) 16:11
Откуда: Сетевое сознание

Сообщение iGrok » 08.05.2008 (Чт) 12:16

Взять первую ссылку. Скачать.
Взять вторую ссылку. Скачать.
Взять третью ссылку. Скачать.

(это вместо "Чего?")
label:
cli
jmp label

begrusse
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 56
Зарегистрирован: 26.02.2008 (Вт) 8:24

Сообщение begrusse » 08.05.2008 (Чт) 12:22

iGrok писал(а):Взять первую ссылку. Скачать.
Взять вторую ссылку. Скачать.
Взять третью ссылку. Скачать.

(это вместо "Чего?")

тогда лучше ваще не пость, взять первую скачать, как? ручками? мне не ручками надо если спрашиваю значит есть для чего

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 08.05.2008 (Чт) 12:24

Чтобы писать программы надо иметь хоть немного мозга.

как? ручками? мне не ручками

Ну качай не ручками и вышеупомянутой функцией.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

iGrok
Артефакт VBStreets
Артефакт VBStreets
 
Сообщения: 4272
Зарегистрирован: 10.05.2007 (Чт) 16:11
Откуда: Сетевое сознание

Сообщение iGrok » 08.05.2008 (Чт) 12:29

О! Кажется до меня допёрло. Он спрашивает, если я не ошибаюсь:

"Как вытащить ссылку из rtf, загруженного в MS RTB Control?"

2begrusse:
Может, так и следовало сформулировать? Тогда бы и "Чего?" не было..
label:
cli
jmp label


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 26

    TopList