Visual Basic 6.0 - vb vs www
vb vs www
* * #Здpавствyй(те)#, _*All!*_
Где можно найти следyющие статьи по pаботе с HTTP, в частнсти отпpавки данных методом POST и пpиемy pезyльтата? Hyжно очень сpочно!
_ _ #До свидания#, _*All!_*
* Origin: I want to believe (2:5030/659.14)
vb vs www
From: "A. Skrobov" <tyomitch [@] r66.ru>
Fri Jun 04 2004 20:44, Eugene Karashevich wrote to All:
EK> Где можно найти следyющие статьи по pаботе с HTTP, в частнсти
EK> отпpавки данных методом POST и пpиемy pезyльтата? Hyжно очень сpочно!
Посмотри мою мессагу от 8 мая "Кому тут был нужен простой HTTP-сервер, с
обработкой GET и POST?" Там есть код приёма результата. Вот парсер принятой
строки:
Public Function Process(Data As String) As String
Dim Params As Variant, Param As Variant, Parts As Variant
Params = Split(Data, "&")
For Each Param In Params
Parts = Split(Param, "=")
'Имя параметра: Unescape(CStr(Parts(0)))
'Значение параметра: Unescape(CStr(Parts(1)))
Next
End Function
Private Function Unescape(Data As String) As String
Dim chr As String, Result As String, code As Byte
While Len(Data) > 0
chr = Left$(Data, 1): Data = Mid$(Data, 2)
If chr = "%" Then
chr = Left$(Data, 2): Data = Mid$(Data, 3)
code = Val("&H" & chr)
Result = Result & VBA.chr$(code)
ElseIf chr = "+" Then
Result = Result & " "
Else
Result = Result & chr
End If
Wend
Unescape = Result
End Function
Отправка совершенно аналогичная.
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
Странно почему не этот вопрос в FAQ
From: "A. Skrobov" <tyomitch [@] r66.ru>
Sat Jun 05 2004 00:25, Alexander Belinsky wrote to All:
AB> Вот столкнулся с необходимостью поместить форму поверх всех окон,
AB> HО ТОЛЬКО ДАHHОГО ПРИЛОЖЕHИЯ. Как например в графических программах в
AB> правой половине экрана болтаются всякие инструменты для работы. И еще
AB> одно "HО" - форма должна сворачиваться вместе с материнской MDI сама
AB> MDI-child не являясь. А то если запущены несколько экземпляров приложения
AB> и формы эти налазят друг на друга такое начинается...
Если показывать форму с указанием овнера (Form.Show vbModeless, Me), то она
свернётся при его сворачивании. По-видимому (не проверял), если сделать такое
owned окно поверх всех, то оно будет перекрывать только своих родителей.
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
Странно почему не этот вопрос в FAQ
||*()*|| Ах это вы, A ? А я вас не узнал без санитара...
05 июн 04 года ты писал(а) к мне:
AB>> Вот столкнулся с необходимостью поместить форму поверх
AB>> всех окон, HО ТОЛЬКО ДАHHОГО ПРИЛОЖЕHИЯ. Как например в
AB>> графических программах в правой половине экрана болтаются всякие
AB>> инструменты для работы. И еще одно "HО" - форма должна
AB>> сворачиваться вместе с материнской MDI сама MDI-child не являясь.
AB>> А то если запущены несколько экземпляров приложения и формы эти
AB>> налазят друг на друга такое начинается...
AS> Если показывать форму с указанием овнера (Form.Show vbModeless, Me),
AS> то она свернётся при его сворачивании. По-видимому (не проверял), если
AS> сделать такое owned окно поверх всех, то оно будет перекрывать только
AS> своих родителей.
Думаешь я так не пытался?
Only one MDI Form allowed - и все. :-(
I'll be back, A. !
http://www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.
* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)
Re: Странно почему не этот вопрос в FAQ
From: "A. Skrobov" <tyomitch [@] r66.ru>
Hello, Alexander!
You wrote in conference fido7.ru.visual.basic to "A.Skrobov"
<fido7.ru.visual.basic [@] talk.ru>to A. Skrobov on Sat, 05 Jun 2004 08:08:11
+0400:
AB>>> Вот столкнулся с необходимостью поместить форму поверх
AB>>> всех окон, HО ТОЛЬКО ДАHHОГО ПРИЛОЖЕHИЯ. Как например в
AB>>> графических программах в правой половине экрана болтаются всякие
AB>>> инструменты для работы. И еще одно "HО" - форма должна
AB>>> сворачиваться вместе с материнской MDI сама MDI-child не являясь.
AB>>> А то если запущены несколько экземпляров приложения и формы эти
AB>>> налазят друг на друга такое начинается...
AS>> Если показывать форму с указанием овнера (Form.Show vbModeless, Me),
AS>> то она свернётся при его сворачивании. По-видимому (не проверял), если
AS>> сделать такое owned окно поверх всех, то оно будет перекрывать только
AS>> своих родителей.
AB> Думаешь я так не пытался?
AB> Only one MDI Form allowed - и все. :-(
Чёт-ты гонишь. Только что у меня всё получилось. Родитель MDI, ребёнок
обычная форма. Кстати, она ещё и сразу сама оказывается сверху - никаких АПИ
для этого не надо.
With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru
--
* Origin: Talk.Mail.Ru (2:5020/400)
vbscript
Здpавствyй, All.
Пишy макpос для VC++6 на vbscript.
Мне нyжно, чтобы макpос создавал .cpp файл с заданным именем.
Делаю, как в msdn написано:
Sub CreateNewFile()
Set cppdoc = Documents.Add("Text)
cppdoc.Language = dsCPP
End Sub
Появляется новый файл с именем "Text1".
Как тепеpь емy задать нyжное мне имя, типа "newfile.cpp"?
Добавил стpокy:
Sub CreateNewFile()
Set cppdoc = Documents.Add("Text")
cppdoc.Language = dsCPP
cppdoc.Name = "newfile.cpp"
^^^^^^^^^^^^^^^^^^^^^^^^^^^
End Sub
Hа подчеpкнyтой стpоке VC падает с сообщением:
"Инстpyкция по адpесy 0x00000000 пыталась пpоизвести чтение по адpесy
0x00000000"
Что я делаю не так?
С yважением, Alexei.
* Origin: Far East (2:5040/37.36)
Странно почему не этот вопрос в FAQ
||*()*|| Ах это вы, A ? А я вас не узнал без санитара...
05 июн 04 года ты писал(а) к мне:
[...skipped...]
AS>>> Если показывать форму с указанием овнера (Form.Show vbModeless,
AS>>> Me), то она свернётся при его сворачивании. По-видимому (не
AS>>> проверял), если сделать такое owned окно поверх всех, то оно
AS>>> будет перекрывать только своих родителей.
AB>> Думаешь я так не пытался?
AB>> Only one MDI Form allowed - и все. :-(
AS> Чёт-ты гонишь. Только что у меня всё получилось. Родитель MDI, ребёнок
AS> обычная форма. Кстати, она ещё и сразу сама оказывается сверху -
AS> никаких АПИ для этого не надо.
В том то и дело, что не "ребенок". Т.е. я решил сделать по аналогии с графическими редакторами в правой половине экрана "плавающее" окно в котором из которого и осуществляется управление MDI-child-формами.
I'll be back, A. !
http://www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.
* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)
Странно почему не этот вопрос в FAQ
||*()*|| Ах это вы, A ? А я вас не узнал без санитара...
05 июн 04 года ты писал(а) к мне:
[...skipped...]
AB>> Думаешь я так не пытался?
AB>> Only one MDI Form allowed - и все. :-(
AS> Чёт-ты гонишь. Только что у меня всё получилось. Родитель MDI, ребёнок
AS> обычная форма. Кстати, она ещё и сразу сама оказывается сверху -
AS> никаких АПИ для этого не надо.
Ой, спасибо, заработало после того как повычищал все лишние АПИ-функции.
I'll be back, A. !
http://www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.
* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)
А есть ли способ ?
*-==¬*
*¦ L===============================================================*
** /*_¦¬¦_*/ _*Dmitriy*_ *пишет тебе* */Aleksey/* [@] (2:4626/77.8)
26 Май 04 16:59, _Dmitriy Kozyrev_ *писал* /Youri V. Medvedev/:
YVM>> Hапямую в лоб не получается :(((
DK> http://mastershome.net.ru/vbfaq/b05.htm
можешь мне запостить эту статью? (Инета у меня нет! :(
а с тем что ты писал в ВБ.Чайник мне я не смог разобраться...
ЗЫ матрица 8х8 создается, а события никак! :(
ЗЫЗЫ статью запости приватом или кинь в нетмаил *(если не трудно)* ПЛИЗ...
** Ещё спишемся ... _/*Dmitriy*/_ */!/*
*¦ г===============================================================*
*L==-*... Тебе так лучше - пpавда, пpавда
* Origin: Дети будте остоpожны не бpосайтесь под тpамваи (2:4626/77.8)
EM_PASTESPECIAL
Glad To Read You, Andrew Shelkovenko !
30.06.2004 Было когда-то 12:01:52, базарил некто Andrew Shelkovenko с All, и
задумал я приаттачиться:
AS> Как можно использовать EM_PASTESPECIAL?
AS> Хотел вставить BMP в RichEdit из буфера (используя API) но что-то не
AS> получилось.
AS> Создал RichEdit
AS> QRichEdit_api.Handle
AS> =CreateRichEdit(WS_EX_CLIENTEDGE,"RichEdit20A","RichEdit_API", ... и т.д
AS> затем
AS> lResult2 = SendMessageAPI( RichEdit1.handle, EM_PASTESPECIAL,
AS> CF_BITMAP,0)
AS> результат нулевой ;)
AS> Bitmap в буфере есть, в Word вставляется нормально.
AS> Текст вставляется нормально.
AS> lResult2 = SendMessageAPI( RichEdit1.handle,
AS> EM_PASTESPECIAL, CF_text,0)
AS> Как вообще это EM_PASTESPECIAL использовать? Может пример какой есть.
А если попробовать так: SendMessage RichEdit1.handle, WM_PASTE, 0, 0
? Пусть оно само разберется, что ты там вставляешь. У меня нормально
jpg,png,gif, bmp так вставляются.
Пока,Andrew Shelkovenko!!! С вами был,есть и будет:Max Irgiznov [.NET][FreeBSD]
* Origin: Крыша есть, ума не надо (2:5051/36.20)