チェンジセット 50: trunk/install/perl/foltialib.pl
- コミット日時:
- 2007/04/04 19:55:30 (18 年前)
- ファイル:
凡例:
- 変更無し
- 追加
- 削除
- 更新
- コピー
- 移動
trunk/install/perl/foltialib.pl
r1 r50 153 153 ##$DBQuery = "insert into foltia_station values ('$stationid' ,'$item{ChName}','0','','','','','','')"; 154 154 #新規局追加時は非受信局をデフォルトに 155 $DBQuery = "insert into foltia_station (stationid , stationname ,stationrecch ) values ('$stationid' ,'$item{ChName}','-1 ')";155 $DBQuery = "insert into foltia_station (stationid , stationname ,stationrecch ) values ('$stationid' ,'$item{ChName}','-10')"; 156 156 157 157 $sth = $dbh->prepare($DBQuery);