|
|
|
|
char ModelName[50],Manufacturer[50], FirmvareVersion[50];
int Res=QueryEcrIdent(ModelName,Manufacturer,FirmvareVersion);
if(Res==0)
{
Log->Lines->Add(ModelName);
Log->Lines->Add(Manufacturer);
Log->Lines->Add(FirmvareVersion);
}else Log->Lines->Add("QueryEcrIdent:"+IntToStr(Res));
}
|
Можно это как то на vb, VBA перевести? | |
|
| |
|
|
|
| дык, смотря что это :)
как по мне, выполняется функция QueryEcrIdent
если вернула результат равный 0 (навернае ашипка)
то в логфайлиликудатам, записываются соотв. данные
ModelName, Manufacturer, FirmvareVersion
иначе , если все ок?
записывается в лог QueryEcrIdent :)
а може и наоборот
чего не понятнова?
на vb конешно можно написать и нетакое! | |
|
| |
|
|
|
| это переводится так
Час полез в Borland C++ Builder/Turbo C++ Explorer (похож синтаксис) а он этого не знает
поищи на Си хелп может быстрее раздуплиш | |
|
| |
|
|
|
|
| а вот тип Char - как по нашему будэ?
| |
|
| |
|
|
|
| си шарп?
{} - это Веgin - End как в делфи
Куда тебя понесло?
Зачем?
ЧЁ надо? | |
|
| |
|
|
|
| Мне кинули код(кусочек) и сказали - как на бейсике - этого мы не знаем - а вот так пожалуйста...
Дык мну нужно перевести на бейсик.
Я вроде перевёл, но эффекта, который должен быть -нету........ | |
|
| |
|
|
|
|
Dim res
Dim ModelName
Dim Manufacturer
Dim FirmvareVersion
ModelName = Space(50)
Manufacturer = Space(50)
FirmvareVersion = Space(50)
Set DX = CreateObject("DynamicWrapperX")
DX.Register App.Path & "\DrvMercFR.dll", "QueryEcrIdent", "i=sss", "f=s", "r=hhh"
res = DX.QueryEcrIdent(ModelName, Manufacturer, FirmvareVersion)
If res = 0 Then
MsgBox ModelName
тута фиг Нам
End If
End Function
|
| |
|
| |
|
|
|
| ЯНХНП
про ДайнэмикРаппер, это другой форум: http://forum.script-coding.com/viewtopic.php?id=2216 | |
|
| |
|
|
|
| фигасе ссылки стали сами форматироваться как ссылки | |
|
| |
|
|
|
|
| ну я раньше если чепятал ссылку, она отображалась в сообщении просто как текст
и приходилось заходить в "редактирование" и там форматировать стринг ссылки как хайперлинк (URL)...
а в этот раз само отформатировалось...
я что-то неправильно делаю? да? | |
|
| |
|
|
|
| У меня (ff5) просто как текст. | |
|
| |
|
|
|
| Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.2.24) Gecko/20111103 Firefox/3.6.24 sputnik 2.4.0.54
я и сам удивляюсь
нужно бы попробовать этот баг на повторяемость, но Осмор не лубит когда на странице ссылки оформлены как ссылки | |
|
| |
|
|
|
| http://forum.script-coding.com/viewtopic.php?id=2216 | |
|
| |