Загрузка по ftp из VideoCapX

 
0
 
Visual Basic
ava
Wosh | 27.09.2013, 12:47
Всем привет!

Такой вопрос.

Захватываю данные с вебки с помощью VideoCapX.
И по инструкции http://www.fathsoft.com/VideoCapX.pdf пытаюсь загрузить на ftp
В инструкции нашел описание:

UploadFrame
Sends current video frame to FTP server
Function UploadFrame (server As String, username As String, password As String, path
As String, filename As String, port As Long, quality As Long) As Boolean

Quality parameter is a JPEG image quality setting (0-100).
Port is usually 21 for FTP service.
See FTPPassiveMode property.
Vcx1.UploadFrame(“ftp.foo.com”,”john”,”tiger”,”images”,”mypic.jpg”,21,70)

Проблема в том, что я не знаю как это применить! У меня выдает ошибку!

Function UploadFrame(server As String, username As String, password As String, path As String, filename As String, port As Long, quality As Long) As Boolean

End Function

Private Sub Command1_Click()
VideoCapX1.UploadFrame("ftp.***.com","admin","admin","images","mypic.jpg",21,70) -ТУТ ВЫДАЕТ ОШИБКУ!!!
End Sub

Private Sub Form_Load()
    VideoCapX1.Connected = True
    VideoCapX1.Preview = True
End Sub


Private Sub Form_Unload(Cancel As Integer)
    VideoCapX1.Connected = False
End Sub


Помогите разобраться!
Comments (5)
ava
Akina | 27.09.2013, 12:17 #
Какую, блин, ошибку?
ava
Wosh | 27.09.2013, 12:20 #
VideoCapX1.UploadFrame("ftp.***.com","admin","admin","images","mypic.jpg",21,70) -ТУТ ВЫДАЕТ ОШИБКУ!!!

Выделяет красным и пишет: Compile error: Expcted:=
ava
Akina | 27.09.2013, 12:23 #
Правильно пишет.
Судя по всему - на форме лежит объект по имени VideoCapX1. У него есть метод UploadFrame, возвращающий значение типа boolean. Т.е. функция. А значит:

1) Пустую функцию - удалиь как страшный сон.
2) Завести переменную типа boolean для получения результата выполнения функции.
ava
Wosh | 27.09.2013, 12:33 #
Теперь я совсем ничего не понимаю!
На форме есть VideoCapX1 в виде подгруженного ocx
Когда пишу VideoCapX1.UploadFrame("ftp.***.com","admin","admin","images","mypic.jpg",21,70)
и нажимаю ентер - выдает эту ошибку! Как исправить не пойму я еще учусь!
ava
Akina | 27.09.2013, 15:50 #
Цитата (Wosh @  27.9.2013,  13:33 findReferencedText)
Как исправить не пойму 

Пункт 2 выполнил? теперь выполни пункт 3.
А вообще - это просто ошибка синтаксиса, и компонент тут не при чём.
И непонимание разницы между процедурой и функцией.
Please register or login to write.
Firm of day
Вы также можете добавить свою фирму в каталог IT-фирм, и публиковать статьи, новости, вакансии и другую информацию от имени фирмы.
Подробнее
Contributors
  Akina   Wosh
advanced
Submit