omni2 の回答履歴

フレーム上に （ボタンやリストやチェックボックスではなくて） ラベルを用いて、ラベルを押すことにより 背景が変わるプログラムを作りたいのですが どのようにイベント処理すれば、うまくいくのでしょうか。 プログラムは以下のように作りましたがイベントリスナを どのように加えればいいのかがわかりません＞＜ よろしくお願いしますm(_ _)m import java.awt.*; import java.awt.event.*; public class Test{ public static void main(String args[]){ MyFrame f=new MyFrame("Test"); f.setVisible(true); } } class MyFrame extends Frame{ Label red, green, blue; MyFrame(String s){ super(s); setSize(200,200); setLocation(100,150); setLayout(new FlowLayout(FlowLayout.CENTER)); add(red=new Label("■")); red.setForeground(Color.red); add(green=new Label("■")); green.setForeground(Color.green); add(blue=new Label("■")); blue.setForeground(Color.blue); addWindowListener(new WindowAdapter(){ public void windowClosing(WindowEvent e){ System.exit(0); } }); } }

以下のようなphp、MySQLのセレクト文は perlだとどのようになるのでしょうか？ $sql="SELECT abc,xyz FROM table "; $res=mysql_query($sql,$con) or die("データベースを検索できませんでした。 mysql_error(); "); $i=0; while($row=mysql_fetch_array($res)) { $abc[$i]=$row['abc']; $xyz[$i]=$row['xyz']; $i++; }

こんにちわ 最近正規表現の勉強をし始めたのですが フォームから入力された$keywordの 全角、半角、大文字、小文字の区別をなくすには どうすれば可能なのでしょうか? 今のところ効率などは求めていませんので 初心者が理解できるくらい簡単なご返答をよろしくお願いします

CGIを改造中です。 オプションメニューを設置しました。 ただ、検索などに利用したかったので、名前と値を別のものにしています。(犬=1,猫=2のように) データ入力画面の方はリストを入力したのですが、名前が50を超えるのでリスト表示画面や検索結果表示画面でif文を大量に書くのは面倒です。 (if($name eq1){print "犬\n";elsif～) どうにかしてこれを簡潔にすることは出来ないものでしょうか?

以下のようなphp、MySQLのセレクト文は perlだとどのようになるのでしょうか？ $sql="SELECT abc,xyz FROM table "; $res=mysql_query($sql,$con) or die("データベースを検索できませんでした。 mysql_error(); "); $i=0; while($row=mysql_fetch_array($res)) { $abc[$i]=$row['abc']; $xyz[$i]=$row['xyz']; $i++; }

以下のようなphp、MySQLのセレクト文は perlだとどのようになるのでしょうか？ $sql="SELECT abc,xyz FROM table "; $res=mysql_query($sql,$con) or die("データベースを検索できませんでした。 mysql_error(); "); $i=0; while($row=mysql_fetch_array($res)) { $abc[$i]=$row['abc']; $xyz[$i]=$row['xyz']; $i++; }

半年ほど前からＳＰ２をインストールし続けていますがエラーが出てしまい完了に至りません。 起動するたびに自動的にインストール作業が行われ1時間ぐらい動作が遅くなりかないません。 エラー コード: 0x8007045D と出るのですが　マイクロソフトのサポートオンラインによるエラー番号による検索にも何故か該当しません。メールで問い合わせも試みましたがサイトが迷路のようになっていてたどりつけません。 アンインストールして再ダウンロードも試みましたが結果的に変わりません。（但しこの過程で「既定のモニターが認識できない云々」のメッセージが出てセーフモードになったり解像度・カラー等の設定が変更されてしまい、復旧に相当時間がかかりましたが、このあたりがポイントなのでしょうか？） とりあえずインストールを手動に切り替えたのですが ＳＰ２が無いままというのもちょっぴり不安です。 解決方法教えてください。 ちなみにＰＣはＮＥＣ　ＬａＶｉｅ　Ｌ　ノートでパソコンに関してはあまり詳しくありません。

家族使用のＰＣですが、履歴の削除やファイルの削除やクッキーの削除は必要でしょうか？ 詳しい人はいないんで、心配はないですがなんとなく気になります。

簡単なのですいません。 メールのアドレスによく使われる 「上バー」 （読み方が分かりませんのであえてこう読ませて下さい） の入力方法を教えて下さい。 キーのひらがなでは「へ」に相当するキーの左上に 記入してある記号だと思うのですが。 　これの反対はアンダーバーですが、これの入力方法も 教えて。

最近ドメインを取得しようかと思っているのですが、いろんなホームページを見ているうちにドメイン名の http://のあとにwww.がつくドメインとついていないドメインがあることに気がつきました。 そこで質問なのですが、www.がドメインに含まれている場合何かメリットはあるのでしょうか？何の意味もなくついているということはないと思うのですが、ドメイン名は短いほうが覚えやすいしwww.が無くてもいいかという気もしますがどうなんでしょうか？ ドメインのwww.のについて詳しい方いらっしゃいましたら、どうか回答をよろしくお願い致します。

一戸建てに防犯カメラを導入する予定ですが インターフォンの画面で見られるタイプはありますでしょうか？ どこでもドアホンで設置できるかと思ったのですが 室内用カメラしかないようで・・・ http://panasonic.jp/door/sw104/index.html 何か良いものはないか、あるいはどこでもドアホンで使用できないかと悩んでおります。

一戸建てに防犯カメラを導入する予定ですが インターフォンの画面で見られるタイプはありますでしょうか？ どこでもドアホンで設置できるかと思ったのですが 室内用カメラしかないようで・・・ http://panasonic.jp/door/sw104/index.html 何か良いものはないか、あるいはどこでもドアホンで使用できないかと悩んでおります。

つたなくもperlを使ってCGIスクリプトを作っている者です。 <input type="checkbox" name="test" value="1">1 <input type="checkbox" name="test" value="2">2 <input type="checkbox" name="test" value="3">3 上記のように、nameは全て同じ名前にして、データを受け取りたいと思っています。 ただ、 if($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN, $buffer, $ENV{CONTENT_LENGTH}); } require './jcode.pl'; @pairs = split(/&/, $buffer); foreach $pair (@pairs) { ($name, $value) = split(/=/, $pair); $value =~ tr/+/ /; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; # 文字コードをS-JIS変換 &jcode'convert(*value, "sjis", "", "z"); $data{$name} = "$value"; と、最初に$data{test}に格納をしています。 現在は全ての項目にチェックをいれても、 3 と表示されてしまいます。 なんとかjcode.lib以外のモジュールを使わないで、 $data{test}に選択された全ての項目を入れることはできないでしょうか。 ご教授いただけましたら幸いです。

始めまして。 早速ですが質問です。 過去の質問を見ても同じ症状がないので質問です。 ActivePerl5.8.4をインストールし、 コマンドプロンプトを開き、 ppm> までは行くのですが、 その先のinstall hogehogeを打ち、 リターンするとプロンプトが動かなくなってしまいます。 過去の質問から～.ppdをDLしてからインストールという方法を試してみましたが、全く同じ症状で・・・。 ファイアーウォールも切って実行もしましたし、 再インストール・再起動もしましたが症状は変わらず・・・。 初めての質問で失礼もあるかと思いますが、 何卒よろしくお願いいたします。 追記 OS:WindowsXP HomeEdition Perl:ActivePerl5.8.4 ppm:Programmer's Package Manager version 3.1 です。

つたなくもperlを使ってCGIスクリプトを作っている者です。 <input type="checkbox" name="test" value="1">1 <input type="checkbox" name="test" value="2">2 <input type="checkbox" name="test" value="3">3 上記のように、nameは全て同じ名前にして、データを受け取りたいと思っています。 ただ、 if($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN, $buffer, $ENV{CONTENT_LENGTH}); } require './jcode.pl'; @pairs = split(/&/, $buffer); foreach $pair (@pairs) { ($name, $value) = split(/=/, $pair); $value =~ tr/+/ /; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; # 文字コードをS-JIS変換 &jcode'convert(*value, "sjis", "", "z"); $data{$name} = "$value"; と、最初に$data{test}に格納をしています。 現在は全ての項目にチェックをいれても、 3 と表示されてしまいます。 なんとかjcode.lib以外のモジュールを使わないで、 $data{test}に選択された全ての項目を入れることはできないでしょうか。 ご教授いただけましたら幸いです。

ホームページ上にデータベースを掲載しようと考えています。 幾つかの項目ごとに検索が出来るようにしたいので、Ｗｅｂ裏技さんの「簡易データベース」を元に作成しようと考えています。 ただ、１つ問題が… １つの情報に対して最高で3つの画像を登録したいんです。が、このCGIには画像アップローダーが付いてません。自分なりに考えたのですが、方法がさっぱりです。 掲載した画像を表示したりする方には何の問題もありません。登録する為のフォームも多分設置できると思います。画像のアップの方法と変更の方法を知りたいです。(サブルーチンの書き方と言えば良いのでしょうか?) 画像アップ時のルール(?)は以下のものです。 1.画像はその情報の番号+「-1～-3」を付ける。(もし、情報番号が10番なら10-1.jpgと10-2.jpg、10-3.jpgが登録できる) 2.掲載できる画像はjpgかgifのみ 3.登録は管理者のみがするので、画像サイズの修正・固定や他の拡張子のものが入力されたら…などは必要ないと思います。 以上、お願いします。

間単に同一CGI内で、ページ毎に異なったhtmlを表示したいのですが、 例えば、 aaa.cgi?p=1で、print "１ページ目"; aaa.cgi?p=2で、print "２ページ目"; みたいな振り分け表示なのですが、 下記記述でうまく表示されません 記述を教えていただけますでしょうか？ よろしくお願いします m(_ _)m if($in{'p'} eq '1'){&1page;} sub 1page{ print"１ページ目"; print"<a href=./aaa.cgi?p=2>２ページ目</a>"; }

「main.cgi」というファイルを作り、単純にHTMLを表示するだけのCGIファイルを作成しました。 こんな感じ ------------main.cgi------------ #!/usr/local/bin/perl print "Content-type:text/html\n\n"; print <<EOM; <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=shift_jis"> <title></title> </head> <body> <略> </body> </html> EOM __END__ -------------------------------- それで、ほかのHTMLファイルに <!--#exec cgi="main.cgi" --> と入力してそのページを見てみると、 [an error occurred while processing this directive] 上の文章が表示されていました。 どうすれば「main.cgi」の内容を表示することができるのでしょうか？ よろしくお願いします。

質問させて下さい。 Windows環境、ActivePerl ver5.8.6.811です。 現在、走らせるとテキストファイルが生成されるスクリプトを作成して使っているのですが、作成したテキストファイルに出力される文字データをUnicode(UTF16-LE)にすることは、可能でしょうか？ 何もしないでいると、S-JISでの出力になってしまうのですが…。 参考になるサイトなどありましたら、教えて頂けたら幸いです。 よろしくお願いします。

質問させて下さい。 Windows環境、ActivePerl ver5.8.6.811です。 現在、走らせるとテキストファイルが生成されるスクリプトを作成して使っているのですが、作成したテキストファイルに出力される文字データをUnicode(UTF16-LE)にすることは、可能でしょうか？ 何もしないでいると、S-JISでの出力になってしまうのですが…。 参考になるサイトなどありましたら、教えて頂けたら幸いです。 よろしくお願いします。