Добрый день!
Пытаюсь с помощью пайпов передать текст.
Код следующий:

Кто передает:

Dim res&
Dim written&
sndBlocked.Enabled = False
lblStat.Caption = "Waiting for client"
lblStat.Refresh
res = ConnectNamedPipe(pipehnd, 0)
If res <> 0 Or (res = 0 And GetLastError() = ERROR_PIPE_CONNECTED) Then
lblStat.Caption = "Sending data"
lblStat.Refresh
buffer$ = String$(200, "aaaaaaaa")
res = WriteFile(pipehnd, buffer, Len(buffer) + 1, written, 0)
Else
MsgBox "Client has disconnected"
End If
lblStat.Caption = "Idle"
sndBlocked.Enabled = True

Кто получает:

res = WaitNamedPipe(txtPipe.Text, 10000)
If res = 0 Then
MsgBox "Pipe is not available at this time"
Exit Sub
End If
pipehandle = CreateFile(txtPipe.Text, GENERIC_READ Or GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0)
If pipehandle = INVALID_HANDLE_VALUE Then
MsgBox "Can't open named pipe"
Exit Sub
End If
Dim inbuf As String
Dim bytesread&, bytesavail&, bytesleft&
res = ReadFile(pipehandle, inbuf, 512, bytesread, 0)
If res Then
Text1.Text = inbuf
End If

Подскажите, как мне нужно переписать выделенные строки, чтобы в окне получателя отобразился передаваемый текст?
Заранее спасибол!

VladConnИ еще: а какая необходимость в использовании pipes? Разве FSO не удобнее?

Т.е. передать строку через текстовый файл? Если вы именно это имели в виду, то не вариант...

VladConnВот здесь неплохой пример на pipes:

http://binaryworld.net/Main/CodeDetail.aspx?CodeId=3665

Посмотрел, но мало чего понял... А особенно не нашел ответа на свой вопрос...

Может, кто-нибудь, кто хоть раз использовал пайпы, поможет мне поправить мой код? Мне это надо очень срочно, но о них я слышу впервые, поэтому сам вряд ли разберусь!
Заранее благодарю!

Может, сразу объясните мне, что значат символы & и $ после переменной? Имею в виду следующую запись:

VB6Альтернативный способ обьявления переменных. Первое если не ошибаюсь Long а второе - String

Да? вот уж не думал...
спасибо!

VladConn boles VladConnИ еще: а какая необходимость в использовании pipes? Разве FSO не удобнее?

Т.е. передать строку через текстовый файл? Если вы именно это имели в виду, то не вариант...

Но ведь вы сами используете WriteFile...

Я все-таки считаю, что это не текстовый файл... Хотя кто его этого лешия знает :)
Объясните мне тогда, эти пайпы что ничем практически не отличаются от текстовых файлов или это просто функции именуются одинаково?