Tmenのプロフィール
- ベストアンサー数
- 0
- ベストアンサー率
- 0%
- お礼率
- 0%
- 登録日1999/08/18
- MySQLのDB
現在MySQLのDBを使いWeb上で情報を検索できる物を作っています。外の時に県名を入れてもらいその県名に当てはまる物を抽出するというものをやりたいのですが、どうしてもDBの所で止まってしまいます。 どうかおしえていただけないでしょう?下記参照 --参照-- my $num; my $str1SQL; $str1SQL=qq{SELECT kyu16 }; $str1SQL=$str1SQL.qq{FROM kyu_table }; if($ADDR1 eq "茨城県"){ # 場所(県) $STRSQL=$str1SQL; $STRSQL=$STRSQL.qq{WHERE kyu16 LIKE "%$ADDR1%" }; } if ($DEBUG_FLG eq '1') {print "STRSQL=$STRSQL<BR>\n";} # debug $sth = $Com::db->prepare($STRSQL) or &Com::ErrorDB("<BR><FONT COLOR=\"#FF0000\" SIZE=+1><B>エラーコード:検索04<br>$ERRDBMSG</B></FONT><BR>"); $sth->execute or &Com::ErrorDB("<BR><FONT COLOR=\"#FF0000\" SIZE=+1><B>エラーコード:検索05<br>$ERRDBMSG</B></FONT><BR>"); $num = $sth->rows; if ($DEBUG_FLG eq '1') {print "num=$num<BR>\n";} # debug
- sendmailができない
(1)お問い合わせフォームを入力(2)入力データを確認する(3)最後に指定先のメールに送り終了 という具合ですが(3)のところで指定先にメールが届きません。メール自体も送られてこないのですがどのような方法があるのでしょうか?どうか教えていただけないでしょうか?お願いします。 (3)のソースコートです。------------- &header; open (KEIJI, "<keijiban.dat") || die "File 'keijiban.dat' Open Error."; # ファイルの内容を1行単位ですべて配列allに読み込む @all = <KEIJI>; split(/:/, $_); if( $_ = $all[0] ){ ($time, $name, $mail, $title, $message, $to) = split(/:/); #送信前処理 &jcode'convert(*subject,'jis'); &jcode'convert(*body,'jis'); # send mail open(MAIL, "| /usr/lib/sendmail -t"); print MAIL "TO: $to\n"; print MAIL "From: $from\n"; print MAIL "Subject: $subject\n"; print MAIL "Content-Type: text/plain;\n\n"; print MAIL "\n"; print MAIL "---------------------------------------------\n"; print MAIL " 名前:$name\n"; print MAIL " 内容:$body\n"; print MAIL " お名前:$firstname $secondname\n"; print MAIL " かな:$kanafirstname $kanasecondname\n"; print MAIL " 所在都道府県 :$area1 $area2\n"; print MAIL " 電話番号:$telno\n"; print MAIL " 性別:$sex\n"; print MAIL " メールアドレス:mailto:$mailad\n"; print MAIL "お問合わ、ご相談内容:"; print MAIL " $con1\n"; print MAIL "---------------------------------------------\n"; close(MAIL); &one_message; } close(KEIJI); # フッターを表示するサブルーチン &footer;
- 面白いアドベンチャー・ゲーム教えてください.
面白いアドベンチャー・ゲームを教えてください. ジャンルは問いません. ただ,うちのパソコンはノート(Win98)で,CDドライブはありません. つまりCDROMで配布されているゲームは遊べないんです. ネットワークからダウンロードできるファイルの大きさで, 面白いアドベンチャー・ゲームがあったら,教えてください. モデムの速度は56Kbpsです.