Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - cj

Страницы: [1] 2 3 4
1
Интернет реклама / Статья по теме: Рисуем Иконки
« : 09 Апреля 2001, 08:54:13 »
Цитировать
Derinie (08-04-2001 20:33):
Попал на ваш форум случайно, когда искал скрипт для новостей. Но здесь мне понравилось, поэтому стал сюда заходить несколько раз на дню, но вот только одна проблема, что-то какой-то он малоактивный.
Вам бы модеров надо, тогда форум бы оживленней стал.

Точно. А то напрягает весь день тусоваться на \'Кто на форуме\' ожидая новых месс. :-)

2
Perl / SQl запрос в базу MySQL
« : 07 Мая 2001, 06:51:16 »
Цитировать
vlad (06-05-2001 11:04):

Что, из области - "сам дурак"
Для справки скачай мою книгу по SQL, PL/SQL ( справочник ) :
http://www.deltacom.co.il/rus/document/oracle_ref.htm

Так в чем ошибка ?

Чья? Ты может хочешь убедить меня, что написанная мной или Chs конструкция ошибочна? Или что?

3
Perl / SQl запрос в базу MySQL
« : 06 Мая 2001, 10:51:24 »
Цитировать
vlad (06-05-2001 10:28):
Цитировать
Chs (04-05-2001 21:30):
Цитировать
cj (04-05-2001 09:20):

Извини за выражение, но ты ламернул :-)
Это называется прибиндить параметр.

2Chs: это делается так
$sth->bind_param(1, \'w\');
$sth->execute();


То, что ты написал в динамик-SQL не вписывается ни какой стороной, так что не выступай. B выражении SQL нет параметра "?" ( знак вопрос )
Так что ты "прибиндиваеш" параметр на весу?

Cлушать надо ухом а не брюхом или говорить надо то, что думаеш, a если не думаеш - то не говори.

Смотри от сознания собственной полноценности не лопни. А заодно почитай что-нить о парсинге SQL запросов и о кэшировании оных.

4
Perl / SQl запрос в базу MySQL
« : 06 Мая 2001, 10:47:16 »
Цитировать
Chs (05-05-2001 14:45):
Цитировать
cj (05-05-2001 09:16):
Верно. Но я точно знаю, что есть версии DBI, который впадают в прострацию при наличии доп. аргументов. :-)
Приводи версии - отвечать надо агрументированно.:))

Отмазон гнилой, но - не помню. Просто однажды наступив на грабли, я стараюсь больше так не делать.

5
Perl / SQl запрос в базу MySQL
« : 05 Мая 2001, 09:16:56 »
Цитировать
Chs (04-05-2001 21:30):
Цитировать
cj (04-05-2001 09:20):

Извини за выражение, но ты ламернул :-)
Это называется прибиндить параметр.

2Chs: это делается так
$sth->bind_param(1, \'w\');
$sth->execute();

:-)
Это не я ламернул, а ты лажанулся.:)
Доки надо внимательнее читать, и по execute в частности.

Нет, это ты лажанулся :-) Хотя бы потому, что я не тебе отвечал. :-)

Цитировать
Код: [Выделить]
If any arguments are given, then execute will effectively call
bind_param for each value before executing the statement.
Values bound in this way are usually treated as SQL_VARCHAR types
unless the driver can determine the correct type (which is rare), or unless
bind_param (or bind_param_inout) has already been used to specify the type.

P.S.: Не наезжай если не уверен.:)

Верно. Но я точно знаю, что есть версии DBI, который впадают в прострацию при наличии доп. аргументов. :-)

6
Perl / SQl запрос в базу MySQL
« : 04 Мая 2001, 09:20:01 »
Цитировать
vlad (03-05-2001 16:03):
Цитировать
Timofey (03-05-2001 11:06):
pole1 pole2
                           q 1
                           w 2
                           e 3
                           r 4

                           как узнать какой букве какая цифра соответствует

                           use DBI;

                           $dbdriver = "mysql";

                           $hostname = "localhost";
                           $port = "3306";
                           $username = "qqqq";
                           $passwordb = "qqqq";
                           $basename = "Worktime";
                           $tablename = "www";
                           print "Content-type: text/html

";
                           $dbh =
                           DBI->connect("dbi:$dbdriver:$basename:$hostname:$port","$username","$passwordb");

                           $sqlstatement = "SELECT pole1,pole2 FROM $tablename" WHERE pole1=\'w\';
                           $sth = $dbh->prepare($sqlstatement);
                           $sth->execute || die "Невозможно выполнить SQL-запрос.";
                           while (@row=$sth->fetchrow_array) {print @row
;}

                           print "
";

                           при таком запросе не работает,хотя другие запросы работают,типа $sqlstatement =
                           "SELECT pole1,pole2 FROM $tablename"; и т.д. в чем беда?

A куда ты вставил выражение Where. ?

должно быть :

$sqlstatement = "SELECT pole1,pole2 FROM $tablename  WHERE pole1=\'w\'";

Для справки скачай мою книгу по SQL, PL/SQL ( справочник ) :
  http://www.deltacom.co.il/rus/document/oracle_ref.htm

Извини за выражение, но ты ламернул :-)
Это называется прибиндить параметр.

2Chs: это делается так
$sth->bind_param(1, \'w\');
$sth->execute();

:-)

7
Perl / работа с файломи....
« : 28 Апреля 2001, 07:14:57 »
Цитировать
ВэйВ[LFL] (26-04-2001 22:48):
народ!
кто знает как можно с помощью перла писать в файле текст между строчками?
или как удолять определённую(к примеру первую) строчку из файла?

Ты Перл с текстовым редактором спутал.

8
Perl / Помогите написать программу
« : 28 Апреля 2001, 07:49:43 »
Цитировать
polo (27-04-2001 23:48):
А если по другому, вводить например 1000, а потом удалить первый символ 1, как удаляется первый символ?

$string =~ s/^\\d//;
Оно тебе это надо?

PS Hint:
my $number = 3;
my $pads = 3;
my $format = "\\%0$pads"."d";

my $out = sprintf($format, $number);
print $out;

# 003

9
Perl / Как сделать постараничный вывод масива?
« : 03 Мая 2001, 06:53:23 »
Цитировать
lodevar (27-04-2001 10:18):
Цитировать
Sonic (27-04-2001 10:10):
То: lodevar
Книжка по перлу у меня есть, но только в ней этого момента не было, я покопался в инете, подумав, что существует оператор который заменяет строки в массиве. Нашёл 2 строки про splice, но так и не разобрался. Теперь всё понятно...
Ещё раз сенкс :)
Минуточку... Какой splice?

@massiv[25]="novoe znachenie";

Неужели это не работает ???

Ты будешь сильно удивлен :-)
$massiv[25] = "novoe znachenie";

10
Perl / Как считать двоичный файл в скалярную переменную Perl?
« : 22 Апреля 2001, 10:29:39 »
Я все сам компилил, поэтому не знаю, как устанавливать доп. модули. IMHO на сайте http://perl.apache.org уже лежит поставка (откомпилированная) с DBI. А по поводу того, что выдает коряво, надо написать binmode(STDIO)

11
Perl / Как считать двоичный файл в скалярную переменную Perl?
« : 21 Апреля 2001, 14:27:46 »
Цитировать
Sergei (20-04-2001 20:44):
Буду очень признателен, если Вы подскажете решение задачи:
Дано:
картинка
Задача:
считать картинку в переменную Perl.
Это нужно для записи картинки в БД MySQL.

Заранее благодарен.

А в чем проблемы? RTFM в районе \'read\'
На вскидку:
если у тебя в таблице только что-то типа id int unsigned auto increment и image mediumblob, то это делается так:

require Symbol;
# Имя имага
my $filename = "image.jpg";
my $FH = Symbol::gensym();
unless(open($FH, $filename))
{
    die("Couldn\'t open file \'$filename\' --> $!");
}

# Для ушлых систем
binmode($FH);
my $content = "";
while(read($FH, my $buffer, 8192))
{
    $content .= $buffer;
}
close($FH);

# $dbh - это хэндл соеденения с БД, полученный где-то там...
$content = $dbh->quote($content);
# $T_Name - название таблицы
my $T_Name = "images";
my $QUERY = qq~INSERT INTO $T_Name (image) VALUES ($content)~;
unless($dbh->do($QUERY))
{
    die("Couldn\'t do the \'INSERT\' clause --> $DBI::errstr");
}

# Идентификатор вновь созданной строки
my $id = $dbh->{\'mysql_insertid\'};

# Ну, как-бы, все.....

12
Perl / MAC адрес машины
« : 21 Апреля 2001, 14:10:12 »
Цитировать
Timofey (20-04-2001 17:01):
Кто подскажет как вытащить MAC адрес машины, с которой зашли на сервер в локальной сети

MAC - это не адрес машины.

13
Perl / Как добиться вставки Perl в HTML
« : 13 Апреля 2001, 08:07:52 »
Цитировать
ik (12-04-2001 20:49):
mod_perl - Это типа тег ХТМЛ и работает наверное только в Апаче ? Как его можно использовать с другими серверами ?

Никак - это проект встройки Перл в "серце" Апача. От сюда полный досту к его API. Соответственно все другие сервера - отдыхают.

14
Perl / Как добиться вставки Perl в HTML
« : 12 Апреля 2001, 16:43:59 »
Цитировать
AliMamed (12-04-2001 10:24):
mod_perl

Точнее Apache::Embperl

15
Perl / как запустить sub с дрогого скрипта
« : 09 Апреля 2001, 10:28:20 »
Цитировать
Yaroslav (09-04-2001 10:19):
Так может кто-то все таки скажет? (доходчиво)

Очень просто. Если неймспейсы одинаковые:

eval
{
    require("2.cgi");
}

SubToExec($params);

Страницы: [1] 2 3 4