Лан карта

Дайте ми насока за работа с лан карта интересува ме управление на релета(протоколи) през лан катрата и изобщо каквото можете да ме насочите а ако има готови модули още по добре. Искам през рутера да си включвам разни неща от компа.
На Делфи

А релетата ти имат ли TCP/IP стек? Ако да - използваш Indy компонентите. Ако не - объркал си се.

Linux isn't free, it's worthless.

Да, прав си, объркал съм се.

Виж тогава това. С него можеш много лесно да си управляваш релетата, а връзката към компютъра е USB. С Delphi просто трябва да четеш и пишеш по COM порт.

Linux isn't free, it's worthless.

Благодаря ти. По скоро това. С компорта и с усб имам работеща но имах в предвид понеже си купих новият модел на ТП-Линк и там има опция за външен хард и си мислех как да го натоваря и с малко релета така и така е постоянно влючен без да минава през компа. Благодаря за насоката да не се занимавам.

Ако някой има нужда, за това ви говорих.

Как да го мина това през Делфито ->

#!/usr/bin/perl

$line=`snmpget -v1 -c 000000000000 172.16.100.2 enterprises.19865.1.2.3.2.0 | awk {'print \$4'} | xargs`;
# chomp $line;
$line=((330*($line/1023))+22);
printf("%.2f\n0\n", $line);

имаш ли идея?

Ако беше казал и какво точно трябва да прави това, цена нямаше да имаш.
Не разбирам пърл, ама ти искаш или да използвам SNMP (използвай idSNMP от Indy) или да прихванеш изхода от команда и да го обработиш (виж това).

Linux isn't free, it's worthless.

Купих си тази джаджа и мога да я управлявам през нейният софт. Но искам да си направя програма на делфи когато натисна бутон да задейства даден пин на джаджа. Платката е доста стойностна и не е скъпа и има доста възможности и искам да си направя програмка по мой си начин но виждам проблем. С тия мрежови работи хич ме няма. На Пърл е командата за включване на пин а има и с MIB. Искам това чудо да заработи под делфи.

Това работи със SNMP. Използвай IdSNMP компонента. Виж например това.

Linux isn't free, it's worthless.

Стигнах до кривата круша. Използвах този код:

procedure TForm1.Button1Click(Sender: TObject);
var
Snmp: TIdSNMP;

begin
IdSNMP1.Active := True;
Snmp := TIdSNMP.Create(nil);
Snmp.Query.Host := '172.16.100.1';
Snmp.Query.Community := 'public';
Snmp.Query.PDUType := PDUGetRequest;
Snmp.Query.MIBAdd('19865.1.2.1.8.0 ','1');

if Snmp.SendQuery then
memo1.Lines.Append('Replies: ' + IntToStr(Snmp.Reply.ValueCount));

Snmp.Free;
end;

Трябва ми устройството да приеме този код:

snmpset -v1 -c private 172.16.100.1 .1.3.6.1.4.1.19865.1.2.1.8.0 i 1

Незнам каде бъркам но гледам че диода на джиджавката приема сигнала при натискане на бутона но не приема командата.
Малко помощ.

Е тук вече не мога да ти помогна. Дебъгвай да видиш какво става и дали не си объркал нещо. Като за начало (ако предположим, че -с опцията задава community-то) в кода ти е public, а в примера е private. Какво трябва да е? А и като гледам техните примери, нещо ми се разминават с твоя...

Успех!

Linux isn't free, it's worthless.

Подкарах го донякъде, малко зор ми дойде с тия кодове.
С този можеш ли да ми помогнеш:

Snmp.Query.MIBAdd((Snmp.Query.Enterprise+'1.2.1.6.0'),'i',1);

трябва да предам този код 1.2.1.6.0 i 1

тези ги приема 1.2.1.6.0

Проблема е такъв че немога да предамвам след кода i 1 или i 0

i e String

Работя с Delphi 7

Благодаря за насоката. Вече с джаджа си говорим на "Ти"
Сега малко трябва да поомувам с Byte to Binary и да видя как да го докарам до CheckBox за малко информация на порта.
Доста голяма играчка си взех.