Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: час
пробовал вот так Public Function FUN_IN_TXT(p As String, Str As String) Dim FileNum As Integer FileNum = FreeFile Open p For Append As FileNum Write #FileNum, Str & vbCrLf Close FileNum MsgBox Str End Function
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.