トップページ⇒php
1001コメント324KB

△▲　WebProg　初心者の質問　▼▽

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん02/08/24 10:18ID:Xl1boM6s
２ちゃんねるは初めて。
WebProg 板は初めて。
質問したいけど、どうしたら良いか分からない。

そんなときは、ここに書き込んでください。
板の住人や、その他が、けなしながら、厳しく教えてくれるかも。

質問する前に、まずはここを読んでね。

2ch 総合ガイド
http://www.2ch.net/guide/
記念カキコ専用スレ
http://pc.2ch.net/test/read.cgi/php/982575577/


お願い。
適切な、板、スレ、を発見した場合、誘導してあげましょう。
スレの性質上 age 進行でお願いします。
0574nobodyさん02/10/29 17:47ID:???
>573
ERPとかを調べてみなされ。
0575nobodyさん02/10/31 00:54ID:???
よく666よりも606の方が安全とか、755よりも705の方が安全だと言われますよね？
otherよりもgroupのパーミッションを制限するメリットはなんですか？
0576nobodyさん02/10/31 00:58ID:j7v4mDxo
すいません。
http://www.tripod.co.jp/guides/cgi2.html
このsendmail
を使って、WAUというツールを使ってみたいです。
ソース、どういう風にしたらいいか教えてください。
初心者ですが、、どうか何卒。
宜しくお願いします。JAVAアプレットオフの人をとばす文字列も教えてください・・
noscriptみたいな感じでしたっけ・・
0577nobodyさん02/10/31 01:14ID:j7v4mDxo
宜しくです
0578nobodyさん02/10/31 01:39ID:???
DBってなんの略でしょうか？
0579nobodyさん02/10/31 01:53ID:???
>575
そういう設定にするかどうかはサーバの設定によるが、パーミッションの考え方としては当然だと思うが?
WEBアクセスユーザをgroupに所属させておくメリットがあるとでも?
0580nobodyさん02/10/31 01:54ID:???
>578
Dragon Ball
0581nobodyさん02/10/31 01:55ID:???
>>578
うぅ、、、なんでしょうねぇ。。。文の前後で判断するしかないかと
0582nobodyさん02/10/31 02:03ID:j7v4mDxo
すいません。
http://www.tripod.co.jp/guides/cgi2.html
を、JAVAのツールで使いたいのです。
次のレスにソースを張ります。
宜しくお願いします。
0583nobodyさん02/10/31 02:04ID:j7v4mDxo
#!/usr/local/bin/perl
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/,$buffer);
foreach $pair (@pairs){
($name,$value) = split(/=/,$pair);
$value =~ tr/+/ /;
$value =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
$browser = $in{'browser'};
$referrer = $in{'referrer'};
$compname = $in{'compname'};
$host=$ENV{'REMOTE_HOST'};
$addr=$ENV{'REMOTE_ADDR'};
if ($host eq '') { $host = $addr; }
if ($host eq $addr){ $host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $addr;}
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year=$year+1900;
print "Content-type: text/html\n\n";
print "<body>\n";
print "remote host: $host\n";
print "remote addr: $addr\n";
print "refferer: $referrer\n";
print " </body>\n";
$mailto = '@'; #自分のメールアドレス
open(MAIL,"| /usr/sbin/sendmail -t");
0584582=58302/10/31 02:05ID:j7v4mDxo
この最後の行のセンドメイル、（ツールです）
コレを、tripodの、５８２のリンクに書いてあるのと調整して使いたいのです。
どう変化させたらいいでしょうか・・
お願いします
0585nobodyさん02/10/31 02:17ID:???
リンク先にやり方書いてあるじゃん。つーか、マルチはだめだよ。
0586582=58302/10/31 02:18ID:j7v4mDxo
すいません。
書いてはあるのですが、
コレを、ツールにどう組み込んだらいいのか、
分からないのです・・直接ブチ込めばいいのでしょうか。
0587582=58302/10/31 02:20ID:j7v4mDxo
どこに入れたらいいのでしょうか。
require TripodMail;
$mail= new TripodMail;
$mail->sendMail($template, /%hash);
これを・・。
0588582=58302/10/31 02:20ID:j7v4mDxo
それと、最後の
sendmailパスを何と入れたらいいのこあ・・
0589nobodyさん02/10/31 02:21ID:???
迷わずブチ込め

　　　　 　　　　∧＿∧
　　　　　　　　（　´∀｀）
　　　　　　　　/, 　　つ
　　　　　　　（_（＿,　）
　　　　　　　　　しし'
0590582=58302/10/31 02:22ID:j7v4mDxo
どこでもいいんですか？
それと最後のsendmailは・・
0591nobodyさん02/10/31 02:23ID:4q5frR3O
http://www.i-chubu.ne.jp/~tomomi-h/marion/navi/navi.cgi?links=20107
0592582=58302/10/31 02:28ID:j7v4mDxo
あげ
0593nobodyさん02/10/31 02:30ID:???
このモジュールはTripodのオリジナルか？
0594582=58302/10/31 02:31ID:j7v4mDxo
そうです。
鳥はsendmail使えないのです
0595nobodyさん02/10/31 02:33ID:???
>>590
なんかややこしいね。テンプレートファイル作れとかなんとか。

sendmailパスは必要ないよ、モジュール使うみたいなので、>>583をちょこっと改造するぐらいじゃ
無理っぽい。

Tripodの専用スレ逝った方がいい。どこにあるのか知らないけれど。
0596582=58302/10/31 02:35ID:j7v4mDxo
つまり、

open(MAIL,"| /usr/sbin/sendmail -t");



はまるごと削除すればいいのですね。
で、どこで聞いたら・・
0597nobodyさん02/10/31 02:35ID:???
ここ見れ

http://www.tripod.co.jp/guides/cgi3.html#tripodmail
0598nobodyさん02/10/31 02:42ID:???
>596
それはそうなんだが、それだけじゃダメだ。
このソースはつづきがあるだろうが、大幅に直さないとダメ。
perlを勉強汁。

0599nobodyさん02/10/31 02:45ID:???
簡単じゃん、ボク小学生だけどわかったYO!
0600nobodyさん02/10/31 02:53ID:j7v4mDxo
５９９さん、教えてください・・お願いします
　
0601５９９02/10/31 02:57ID:???
まず大事なことは、送信するメール内容をファイルとして保存すること。
メール内容は毎回変わるの？ それとも定形のものを毎回送るの？
0602５９９02/10/31 03:05ID:???
毎回ファイル作るのは面倒だから、あらかじめ固定の部分だけ記述したファイル
を作成しる。以下の内容でファイルを作成して cgi-bin 以下の場所に保存しる。

To: $to
From: $from
Subject: $subject

$body
0603nobodyさん02/10/31 03:07ID:j7v4mDxo
毎回変わります。
というか、訪問者の串情報を
管理人に送るツールなのです。
レス感謝です
0604５９９02/10/31 03:15ID:???
あとは、これソースに書くだけ

require TripodMail;
$MAIL= new TripodMail;
$file= "保存したファイル相対パス";
$hash{'to'}= '送信先メールアドレス';
$hash{'from'}= '送信元メールアドレス';
$hash{'subject'}= 'メールの題名';
$hash{'body'}= 'ここにメール内容を代入';
$MAIL->sendMail($file, \%hash);
0605nobodyさん02/10/31 03:20ID:j7v4mDxo
ありがとうございます。
つまり、サイト訪問者のプロキシ情報を送る場合、
「毎回内容が変わるから」無理という事ですか？
宜しくお願いします。
それと、鯖から送る場合、5番目はどうなるのでしょうか。
0606５９９02/10/31 03:23ID:???
５番目？

$hash{'body'} に内容を全部ぶち込めば？
0607nobodyさん02/10/31 03:26ID:j7v4mDxo
hashi fromになってますけれど・・。
送信先は、自分のアド。送信元は、どうしたら・・。例えばノ話。

それと、毎回内容が変わるのです。
ＷＡＵと合体させる方法を教えてください。
0608５９９02/10/31 03:30ID:???
送信元も自分のアドでいいのでは？

WAUってなに？
0609nobodyさん02/10/31 03:31ID:j7v4mDxo
import java.applet.*;
import java.awt.*;
import java.io.*;
import java.net.*;


public class GetIpApplet extends Applet
{
String compName; //コンピュータの名前
String host; //接続サーバー名
String browser; //ブラウザ
String referrer; //referrer用
Image buffer;
Graphics bufferg;
InetAddress localHost; //コンピュータ名取得用

public void init()
{
try{
buffer = createImage(400,150);
bufferg = buffer.getGraphics();
0610nobodyさん02/10/31 03:32ID:j7v4mDxo
bufferg.setColor(new Color(0,64,64));
bufferg.fillRect(0,0,400,150);
localHost = InetAddress.getLocalHost();
//コンピュータ名を取得
compName = localHost.getHostName();
//サーバー名
host = "tripod.co.jp";
repaint();
//ブラウザ名の取得
browser = getParameter("browser");
//referrerの取得
referrer = getParameter("referrer");
//サーバーへ接続
Socket socket = new Socket(host,80);
PrintWriter pw = new PrintWriter(socket.getOutputStream());
BufferedReader br = new BufferedReader(
new InputStreamReader(socket.getInputStream()));
//送信データの作成
String sendData = "browser=" + URLEncoder.encode(browser) +
"&referrer=" + URLEncoder.encode(referrer) +
"&compname=" + URLEncoder.encode(compName);
//データの送信
pw.print("GET "+"http://sage/cgi-bin/visitor.cgi?"
+sendData+"\r\n");
pw.flush();
0611コレです。訪問者のプロクシを、”管理”人に送信するＪＡＶＡ．02/10/31 03:32ID:j7v4mDxo
//CGI側からの返信を受けとり、アプレットに表示
bufferg.setFont(new Font("Serif",Font.BOLD,18));
bufferg.setColor(new Color(225,225,225));
String string = br.readLine();
for(int i = 0;i < 2;i++){
string = br.readLine();
bufferg.drawString(string,20,25*(i+1));

}
socket.close();
}
catch(Exception e){
}
}
public void paint(Graphics g)
{
if(bufferg == null)
bufferg = buffer.getGraphics();
g.drawImage(buffer,0,0,this);
}

public void update(Graphics g)
{
paint(g);
}

}
0612コレです。訪問者のプロクシを、”管理”人に送信するＪＡＶＡ．02/10/31 03:33ID:j7v4mDxo
これ、ジャバなんですがどこか可笑しいですかね？
コンパイルエラーが出ます。
0613コレです。訪問者のプロクシを、”管理”人に送信するＪＡＶＡ．02/10/31 03:35ID:j7v4mDxo
!/usr/local/bin/perl
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/,$buffer);
foreach $pair (@pairs){
($name,$value) = split(/=/,$pair);
$value =~ tr/+/ /;
$value =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
$browser = $in{'browser'};
$referrer = $in{'referrer'};
$compname = $in{'compname'};
$host=$ENV{'REMOTE_HOST'};
$addr=$ENV{'REMOTE_ADDR'};
if ($host eq '') { $host = $addr; }
if ($host eq $addr){ $host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $addr;}
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year=$year+1900;
print "Content-type: text/html\n\n";
print "<body>\n";
print "remote host: $host\n";
print "remote addr: $addr\n";
print "refferer: $referrer\n";
print " </body>\n";
$mailto = '; #自分のメールアドレス
0614nobodyさん02/10/31 03:36ID:j7v4mDxo
require TripodMail;
$MAIL = new TripodMail;
$mail_template = "./flintstones_mail.txt";
%variables = ('email' => '[email protected]',
'name' => 'Wilma',
'number' => '2');
$MAIL->sendMail($mail_template, \%variables);

print MAIL "From: visitorcheck\@somewhere.net\n"; #Fromは適当
print MAIL "To: $mailto\n";
print MAIL "Subject: your homepage access information\n";
print MAIL "\n";

print MAIL "computer name : $compname\n";
print MAIL "Host : $host\n";
print MAIL "IP : $addr\n";
print MAIL "referrer : $referrer\n";
print MAIL "browser : $browser\n";
print MAIL "Date : $year/$mon/$day\n";
print MAIL "Time : $hour:$min:$sec\n";
close(MAIL);
exit;

0615５９９02/10/31 03:36ID:???
それよりもなによりも、Tripodではメール送信はさっきのモジュール使うしかない
ということなら、CGIから送信するしかないのでは？
0616nobodyさん02/10/31 03:37ID:j7v4mDxo
613,14は、
sendmailの設定をする所があるので、
さっき質問したとおり、鳥とどう組み合わせたらいいのか、分からないのです。

その前のソースは、
コンパイルエラーが何故出るか、教えてください・・お願いします。レスありがとうです。
訪問者の串情報を、管理人のメアドに送るＪＡＶＡアプレットです。
0617５９９02/10/31 03:39ID:???
６１４は違います。。。

$MAIL->sendMail($mail_template, \%variables); の行までで送信されるはずです。
以降の print文は不要です。
0618５９９02/10/31 03:40ID:???
Javaのコンパイルエラーは、エラー内容を見ないとなんとも・・・
0619nobodyさん02/10/31 03:49ID:j7v4mDxo
C:\Documents and Settings\Owner>set PATH=%;c:\j2sdk1.4.02\bin

C:\Documents and Settings\Owner>javac GetIpApple
'javac' は、内部コマンドまたは外部コマンド、
操作可能なプログラムまたはバッチ ファイルとして認識されていません。

C:\Documents and Settings\Owner>c:\j2sdk1.4.0_02\bin\java.exe
Usage: java [-options] class [args...]
(to execute a class)
or java -jar [-options] jarfile [args...]
(to execute a jar file)

where options include:
-client to select the "client" VM
-server to select the "server" VM
-hotspot is a synonym for the "client" VM [deprecated]
The default VM is client.

-cp -classpath <directories and zip/jar files separated by ;>
set search path for application classes and resources
-D<name>=<value>
0620nobodyさん02/10/31 03:49ID:j7v4mDxo
set a system property
-verbose[:class|gc|jni]
enable verbose output
-version print product version and exit
-showversion print product version and continue
-? -help print this help message
-X print help on non-standard options
-ea[:<packagename>...|:<classname>]
-enableassertions[:<packagename>...|:<classname>]
enable assertions
-da[:<packagename>...|:<classname>]
-disableassertions[:<packagename>...|:<classname>]
disable assertions
-esa | -enablesystemassertions
enable system assertions
-dsa | -disablesystemassertions
disable system assertions

C:\Documents and Settings\Owner>set path=c:\j2sdk1.4.0_02\bin;%PATH%

C:\Documents and Settings\Owner>javac GetIpApplet.java
エラー: GetIpApplet.java を読み込めません。
エラー 1 個

C:\Documents and Settings\Owner>

こんなかんじでｒす
0621５９９02/10/31 03:57ID:???
パスが通ってないのかな？ 念のため以下のようにしてみて。。。

set PATH="%PATH%";c:\j2sdk1.4.02\bin

あと、javac コマンドに渡すファイル名は拡張子 .java じゃなくてもよかった？
0622５９９02/10/31 04:00ID:???
javac GetIpApple ⇒　javac GetIpApplet.java
0623５９９02/10/31 04:14ID:???
解決したかな？ 小学生なんでもう寝ます。学校あるし。。。
0624nobodyさん02/10/31 04:14ID:j7v4mDxo
C:\Documents and Settings\Owner>c:\j2sdk1.4.0_02\bin\java.exe
Usage: java [-options] class [args...]
(to execute a class)
or java -jar [-options] jarfile [args...]
(to execute a jar file)

where options include:
-client to select the "client" VM
-server to select the "server" VM
-hotspot is a synonym for the "client" VM [deprecated]
The default VM is client.

-cp -classpath <directories and zip/jar files separated by ;>
set search path for application classes and resou
-D<name>=<value>
set a system property
-verbose[:class|gc|jni]
enable verbose output
-version print product version and exit
0625nobodyさん02/10/31 04:14ID:j7v4mDxo
-showversion print product version and continue
-? -help print this help message
-X print help on non-standard options
-ea[:<packagename>...|:<classname>]
-enableassertions[:<packagename>...|:<classname>]
enable assertions
-da[:<packagename>...|:<classname>]
-disableassertions[:<packagename>...|:<classname>]
disable assertions
-esa | -enablesystemassertions
enable system assertions
-dsa | -disablesystemassertions
disable system assertions

C:\Documents and Settings\Owner>set path="%PATH%";c\j2sdk1.4.02\bin

C:\Documents and Settings\Owner>javac GetIpApplet.java
エラー: GetIpApplet.java を読み込めません。
エラー 1 個

C:\Documents and Settings\Owner>
0626nobodyさん02/10/31 04:30ID:???
教えて・・
0627nobodyさん02/10/31 04:35ID:???
あげ
0628nobodyさん02/10/31 10:50ID:???
６１３，６１４のソースを、
トリップのセンドメールと合体させたいです。
宜しくお願いします。
管理人に、自動的にサイト訪問者のプロキシ情報を送信するツールです。
で、二つあるソースのうちの一個がこれです。
よろしくです
0629６１３と１４の説明です。02/10/31 10:51ID:???
はじめに、visitor.cgiの変更について説明します。
27行目の
$mailto = '[email protected]';
の部分を、自分のメールアドレスに書き換えてください。
また、28行目の
open(MAIL,"| /usr/sbin/sendmail -t");
も、CGIを設置するサーバーのsendmailのパスにあわせてください。
そして、CGIの使えるサーバーにアップしてください。（必ずしもログをとり
たいホームページと同じサーバーでなくてもOKです。）


0630nobodyさん02/10/31 11:34ID:GrPTAu+d
超初心者です。
#!/usr/local/bin/perl

print "hello\n";
というプログラムをtest.cgiというファイルに保存して自分のＨＰに転送した
んですけど、エラー５００とかいわれて実行してくれません。何が原因なんで
しょうか？ＨＰはinfoseekで、ファイルはcgi-binというフォルダの中にいれて
転送しました。よろしくお願いします。
0631nobodyさん02/10/31 11:43ID:???
>630
・送信するときASCIIモードでやったか? サーバに転送したとき改行がLFになってないとエラーになるぞ。
・パーミッションは正しいか?
・#!/usr/local/bin/perl は正しいか? サーバによって違うぞ。
0632nobodyさん02/10/31 11:47ID:j7v4mDxo
http://210.143.102.80/upload/index.cgi　http://home.tripod.co.jp/help/tool/tripodcgi.html

お願いします。
最初のアドレスに、「あげ」というファイルを上げました。
下の奴が、ソースで、上のはreadmeです。（説明書）
そして、前者のソースに、後者のアドレスのsendmailを入れたいのですが、うまくいきません。
どうか、正しいソースに組み立てて頂けると幸いです。
宜しくお願いします。
0633nobodyさん02/10/31 12:31ID:???
>>630
ヘッダを忘れてる。

print "content-type:text/html\n\n";

これを最初に核。
それからCGIのテストは共用サーバでやっちゃダメ。ローカルでやること。
0634nobodyさん02/10/31 12:32ID:???
>>630
CGIで実行させるならヘッダーが必要です。
print "Content-type: text/html; charset=Shift_JIS\n\n";
print "hello world\n";
0635６３２02/10/31 12:39ID:???
お願いします・・
0636nobodyさん02/10/31 12:52ID:???
>632
あれだけ教えてもらってなぜわからんかな。
PRINTしてる$refererとか$compnameとか、ハッシュにほりこんで、
最後に$MAIL->sendMail($mail_template, \%variables);すればいいだけじゃん。
ちっとは学習しろ。

ここは質問スレなんでお願いスレじゃないぞ。
代りにやって欲しいなら誰かに金出して頼めば?
0637６３２02/10/31 13:00ID:???
ハッシュにほりこむ？？
0638６３２02/10/31 13:01ID:???
ソース張ってください・・レスありがとうございます
0639nobodyさん02/10/31 13:04ID:???
>>638
>>604にある。
0640６３２02/10/31 13:07ID:???
ありがとうございます。
どこに入れてもいいんですか？
0641６３２02/10/31 13:08ID:???
require TripodMail;
$MAIL= new TripodMail;
$file= "保存したファイル相対パス";
$hash{'to'}= '送信先メールアドレス';　　　→管理人のアドレス
$hash{'from'}= '送信元メールアドレス';　　→ココは名にて入れたらいいんでしょう？
$hash{'subject'}= 'メールの題名';
$hash{'body'}= 'ここにメール内容を代入';
$MAIL->sendMail($file, \%hash);

宜しくお願いします。
保存したファイル相対パス、は
「GetIpApplet」でいいんですか？
0642６３２02/10/31 13:09ID:???
それと、メール内容は・・。
ＪＡＶＡに由来するのですが、そこは省略していいのですか？
0643ヽ(´ー｀)ノ02/10/31 13:16ID:???
ヽ(´ー｀)ノ
0644nobodyさん02/10/31 13:20ID:???
To: $mailto
From: [email protected]
Subject: your homepage access information

computer name : $compname
Host : $host
IP : $addr
referrer : $referrer
browser : $browser
Date : $year/$mon/$day
Time : $hour:$min:$sec

↑をtemplate.txtというファイル名でcgi-binディレクトリにアップする。
0645nobodyさん02/10/31 13:22ID:???



６３２サポートスレッド化



0646nobodyさん02/10/31 13:28ID:???
require TripodMail;
$MAIL = new TripodMail;
$mail_template = "template.txt";
$variables{mailto} = $mailto;
$variables{compname} = $compname;
$variables{host} = $host;
$variables{addr} = $addr;
$variables{referrer} = $referrer;
$variables{browser} = $browser;
.
.
.

$variables{sec} = $sec;
$MAIL->sendMail($mail_template, \%variables);
0647６３２02/10/31 13:33ID:???
ありがとうございます。６４６は、どういった風にしたらいいでしょうか。
感謝です！
0648６３２02/10/31 13:44ID:???
６４４は、鯖の中に
cgi-binというフォルダを作って、そこに格納するのですよね・・。
0649nobodyさん02/10/31 13:50ID:???
いい加減うぜぇよ。
一から全部教えて君かよ！
聞いてばっかじゃねぇかよ！！
自力で勉強しる！
0650６３２02/10/31 13:50ID:???
そういえば、よくアプロダにテレビ番組アプしてますが、違法ですよね？

なんで告訴されないんでしょう。
0651６３２02/10/31 13:54ID:???
すいません・・。
死ぬほど頑張っているのです・・丸2日・・。丸一日寝てないです
お願いします・・・。
６４４は、分かりました。（ＣＧＩ−ＢＩＮてフォルダを作るんですね・・。）
次の所、
0652６３２02/10/31 13:55ID:???
#!/usr/local/bin/perl
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/,$buffer);
foreach $pair (@pairs){
($name,$value) = split(/=/,$pair);
$value =~ tr/+/ /;
$value =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
$browser = $in{'browser'};
$referrer = $in{'referrer'};
$compname = $in{'compname'};
$host=$ENV{'REMOTE_HOST'};
$addr=$ENV{'REMOTE_ADDR'};
if ($host eq '') { $host = $addr; }
if ($host eq $addr){ $host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $addr;}
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year=$year+1900;
print "Content-type: text/html\n\n";
print "<body>\n";
0653６３２02/10/31 13:55ID:???
print "remote host: $host\n";
print "remote addr: $addr\n";
print "refferer: $referrer\n";
print " </body>\n";
$mailto = '[email protected]'; #自分のメールアドレス
open(MAIL,"| /usr/sbin/sendmail -t");
print MAIL "From: visitorcheck\@somewhere.net\n"; #Fromは適当
print MAIL "To: $mailto\n";
print MAIL "Subject: your homepage access information\n";
print MAIL "\n";

print MAIL "computer name : $compname\n";
print MAIL "Host : $host\n";
print MAIL "IP : $addr\n";
print MAIL "referrer : $referrer\n";
print MAIL "browser : $browser\n";
print MAIL "Date : $year/$mon/$day\n";
print MAIL "Time : $hour:$min:$sec\n";
close(MAIL);
exit;
0654６３２02/10/31 13:56ID:???
この２つのレスのソースに、どうブチ込んだらいいのか分からなくて・・
もう少しで終わります・・どうかお願いします・・貴方だけがたよりなので・・うう。
0655nobodyさん02/10/31 13:59ID:???
>>646を
open(MAIL
.
.
close(MAIL);
と入れ換える。
0656６３２02/10/31 14:02ID:???
#!/usr/local/bin/perl
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/,$buffer);
foreach $pair (@pairs){
($name,$value) = split(/=/,$pair);
$value =~ tr/+/ /;
$value =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("C", hex($1))/eg;
$in{$name} = $value;
}
$browser = $in{'browser'};
$referrer = $in{'referrer'};
$compname = $in{'compname'};
$host=$ENV{'REMOTE_HOST'};
$addr=$ENV{'REMOTE_ADDR'};
if ($host eq '') { $host = $addr; }
if ($host eq $addr){ $host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $addr;}
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year=$year+1900;
print "Content-type: text/html\n\n";
print "<body>\n";
print "remote host: $host\n";
0657６３２02/10/31 14:02ID:???
print "remote addr: $addr\n";
print "refferer: $referrer\n";
print " </body>\n";
$mailto = '[email protected]'; #自分のメールアドレス
require TripodMail;
$MAIL = new TripodMail;
$mail_template = "template.txt";
$variables{mailto} = $mailto;
$variables{compname} = $compname;
$variables{host} = $host;
$variables{addr} = $addr;
$variables{referrer} = $referrer;
$variables{browser} = $browser;
print MAIL "From: visitorcheck\@somewhere.net\n"; #Fromは適当
print MAIL "To: $mailto\n";
print MAIL "Subject: your homepage access information\n";
print MAIL "\n";

print MAIL "computer name : $compname\n";
print MAIL "Host : $host\n";
print MAIL "IP : $addr\n";
print MAIL "referrer : $referrer\n";
print MAIL "browser : $browser\n";
print MAIL "Date : $year/$mon/$day\n";
print MAIL "Time : $hour:$min:$sec\n";
$variables{sec} = $sec;
$MAIL->sendMail($mail_template, \%variables);
exit;
0658６３２02/10/31 14:03ID:???
これでグーですか？
0659nobodyさん02/10/31 14:04ID:???
PRINT MAILの行は全部要らん。

日本語判ってないのか? 寝ぼけてるのか?
一度寝た方がいいぞ。

0660６３２02/10/31 14:10ID:???
ありがとうございます。
ＣＧＩ−ＢＩＮを、鯖にフォルダつくって、其の中に入れるんですよね。
で、他のＣＧＩも、全部そのフォルダに入れればいいんですね？
逆に、そのフォルダに入れなかったら、どうなるんでしょう。
フォルダなしで、いきなりファイル名に[cgi-bin]とつけても動きませんか？
レス感謝です！
0661nobodyさん02/10/31 14:12ID:???
>>660
http://home.tripod.co.jp/help/tool/tripodcgi.html
よく読め
0662nobodyさん02/10/31 14:15ID:???
自分で作ってもモジュールが作られないからだめ。
CGIを利用するに設定すれば自動的にcgi-binフォルダとモジュールが作られる。
あとアクセスは
http://cgi.tripod.co.jp/自分のID/cgi-bin/mail.cgi?
0663６３２02/10/31 14:21ID:???
ありがとうございます。
最後の2行だけ、意味が判らないのですが・・宜しかったら宜しくお願いします・。
サイトは、
http://垢.tripod.co.jpですよね。
それは何でしょうか・・。どういう風にしたら・・。
0664nobodyさん02/10/31 14:22ID:???
>>657
year,mon,day,hour,min
についても同様にやってください。
0665nobodyさん02/10/31 14:26ID:???
>>663
解説のページを100回読め。

6. 動作させたいCGIが例えば、「bbs.cgi」ならば、以下のURLを入れることでCGIのページが表示されます。

掲示板・チャット等の場合
<a href="http://cgi.tripod.co.jp/あなたのメンバー名/cgi-bin/bbs.cgi">私の掲示板</a>

カウンタの場合
<IMG SRC="http://cgi.tripod.co.jp/あなたのメンバー名/cgi-bin/bbs.cgi">

注意！　もし、ページとして表示するスクリプト中にTripodの広告が表示されていない場合には、前触れなくアカウントが削除される可能性がありますので、ご注意ください。[ 広告の挿入の仕方 ]
0666６３２02/10/31 14:30ID:???
ありがとうございます！早速設定変えました。
それと、ソースなのですが、

String sendData = "browser" + URLEncoder.encode(browser) +
"&referrer=" + URLEncoder.encode(referrer) +
"&compname=" + URLEncoder.encode(compName);

この3行に、「推奨されません」と出ました。どう変えたらいいのでしょうか・・宜しくお願いします。
ありがとうございます！
0667nobodyさん02/10/31 14:32ID:???
もうだめぽ。
0668nobodyさん02/10/31 14:33ID:???
Javaの質問はJavaスレで訊け。

ま、推奨されなくても動いてりゃいい。
お前にそんなこと気にしてる余裕があるかい?
0669nobodyさん02/10/31 14:35ID:???
（￣ー￣）y-.。o○ (さて一服するか)
0670６３２02/10/31 14:36ID:???
クラスが作成されてないんですが・・。
どこに作成されるんでしたっけ？コンパイルをすると。
067163002/10/31 14:44ID:GrPTAu+d
>>631-633-634
レスありがとうございます。プログラムを
#!/usr/local/bin/perl

print "Content-type: text/html; charset=Shift_JIS\n\n";
print "hello\n";
のように変えてみましたが、やはりエラー５００でした。それと、送信はASCII
モードになってました。あと、パーミッションは755にしてあります。
http://isweb.www.infoseek.co.jp/Icont?sv=IW&pg=iw_spec.html
で見たところ、perlのパスもあっているようです。レス遅くなってすいません
でした。
0672６３２02/10/31 14:48ID:???
ここでCODEBASE="http://tech.millto.net/~syuu
ki/cgi-bin/"のところは自分がGetIpAppletをアップしたディレクトリに変更し
てください

この場合、http://アカ.tripod.co.jp/cgi-bin　でしょうか。それとも。
http://cgi.tripod.co.jp/アカ/cgi-bin/こんな感じなのでしょうか。宜しくお願いします・・
0673６３２02/10/31 14:52ID:???
それと、ディレクトリ、てのは
http://cgi.tripod.co.jp/settingcrass/cgi-bin/*****.cgi
でいったら、
http://cgi.tripod.co.jp/settingcrass/cgi-bin/
までですよね？
■ このスレッドは過去ログ倉庫に格納されています