|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Vlad Z 2:5020/400 13 Apr 2001 13:06:45
To : All
Subject : Perl + MySql
--------------------------------------------------------------------------------
Добрый день!
Может это офф, но вроде больше и спросить негде...
Приведу кусок кода. Он должен обновлять данные в таблице.
-------------------------------------------------
$sth=$dbh->Query("select id,name,htmlcode,status from $table order by
name");
while(@r=$sth->Fetchrow()){
if($FORM{"del$r[0]"} eq "1") {
$sth2=$dbh->Query("delete from $table where id=$r[0]");
}
if($FORM{"name$r[0]"} ne $r[1]){
$sth2=$dbh->Query("update $table set name='$FORM{\"name$r[0]\"}' where
id=$r[0]");
}
if($FORM{"htmlcode$r[0]"} ne $r[2]){
$sth2=$dbh->Query("update $table set name='$FORM{\"htmlcode$r[0]\"}' where
id=$r[0]");
}
if($FORM{"status$r[0]"} ne $r[3]){
$sth2=$dbh->Query("update $table set name='$FORM{\"status$r[0]\"}' where
id=$r[0]");
}
}-----------------------------------------------------------
Hо вот, что происходит: когда обновляются поля name или status все
происходит хорошо. Hо когда обновляется поле htmlcode - это упорно
записывается в name.
Понять почему я не могу...
Влад.
--- ifmail v.2.15dev5
* Origin: Svit Online (post does not reflect views of Golden Tele (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
