cok acil!!

arkadaslar asagidaki kodda parent.frames[\'sag\'] taginda frames[\'sag\'] kismini kaldirinca linkler calisiyor ama istedigim frame'de acilmiyor ben sag frame'de acilsin istiyorum bana yardim edin nerede yanlislik var
tesekkurler


sub urunlistesi{
local($urun_tablo,$idim,$kac,$sayfa)=@_;
$dbh=Mysql->connect("localhost",$db,$db_usr,$db_pass);
$toplam=0;
$toplam=$genel_toplam;
$toplam_sayfa=$toplam/$kac;
if ((($toplam % $kac)>0) && $toplam>=$kac){
$toplam_sayfa=$toplam_sayfa+1;
}
$alt_limit=($sayfa-1) * $kac;
$ust_limit=0;
if($sayfa==$toplam_sayfa){
$ust_limit=$toplam;
}else{
$ust_limit=$sayfa*$kac;
}

$sorgu1=qq{select siparis_kod,kod,urun_adi,aciklama,fiyat,para_birim,pic,urun_kod from $urun_tablo where konu_id=$idim order by urun_adi asc};
$result1=$dbh->query
($sorgu1);
$saya=1;
if ($toplam_sayfa>1){
$listmenu.="<form name=form1>";
$listmenu.="<select name=menu1onChange=MM_jumpMenu('parent.frames[\'sag\']',this,0)>";

while(@urunler=$result1->FetchRow){
$fiyati=@urunler[4];
if (@urunler[5]==2){
$fiyati.="\Ä (KDV Dahil)";
}else{
$fiyati="\$".$fiyati."+KDV";
}
if (@urunler[6] eq "0"){
$picof="shim.gif";
}else{
$picof=@urunler[6];
}
if (@urunler[3] eq "0"){
$acikl=""; }else{
$acikl=@urunler[3];
}
$listmenu.="<option value=$def_url_cgi/erkan/urun.cgi?id=@urunler[1]>";
$listmenu.="<b><font face=\"verdana, helvetica, arial\" color=#000000> @urunler[7]/@urunler[2]";
$listmenu.="</font></b></option><br>";
}
}$listmenu.="</select>";
$listmenu.="</form>";
return $list;
}