送信できましたの画面に画像を入れるには…

ひま [E-Mail] 2000/06/10(土) 04:39:37
cgiの”送信できました”と最後に出る画面に画像を入れたいのですが、
全くの素人で、HTMLの知識しかなくどのようにしたら良いのか分かりません
分かる方いらしたら至急教えて!!

D.D. 2000/06/10(土) 04:55:35
ソースの「送信できました」あたりにHTMLの知識をぶつけてやればいいと思う。

ていうか、至急って何ですか？(ピュア)

Web作者 2000/06/10(土) 04:57:35
あの、、ソースコードを記述して頂かないと、
回答しにくいと思うのですが。
> 分かる方いらしたら至急教えて!!
ということならなおさら:-)

例えば、CGIの最後の方に(exit;の前)以下の用に書きこむ等。

print 'Content-type: text/html; charset=Shift-JIS',"\r\n\r\n";
print '送信できました',"\n";

ヒソカ 2000/06/10(土) 05:01:32
プッ・
プリント文の中にHTMLを書けばヨロシ。

Web作者 2000/06/10(土) 05:04:06
> プッ・
> プリント文の中にHTMLを書けばヨロシ。
(^^;↓
> 全くの素人で、HTMLの知識しかなくどのようにしたら良いのか分かりません

HTMLでなくても良いのではないでしょうかね？
ただのテキストだけで。。＞ひまさん

ひま 2000/06/10(土) 05:05:37
どう言う風に質問したらよいのかわからず…
CGIを加えてみます。

#!/usr/local/bin/perl

require 'cgi-lib.pl';
require 'jcode.pl';

&ReadParse;

while (($k,$v) = each %in) {
&jcode'convert(*v,'sjis');
$in{$k} = $v;
}

open (IN, ">>fromCGI.csv");
flock (IN,2);
if ($in{'flg_kengaku'} eq 't') {
print IN "$in{'property'}, $in{'kengaku_mon'} / $in{'kengaku_day'}, $in{'kengaku_hour'} : $in{'kengaku_min'}, $in{'name1'}, $in{'name2'}, $in{'furigana1'}, $in{'furigana2'}, $in{'e-mail'}, 19$in{'year'} / $in{'month'} / $in{'day'}, $in{'sex'}, $in{'zip1'}-$in{'zip2'}, $in{'jushonm1'}, $in{'jushonm2'}, $in{'jushonm3'}, $in{'tel1'}-$in{'tel2'}-$in{'tel3'}, $in{'question'}\r\n";
}
else {
print IN "$in{'property'}, ***, ***, $in{'name1'}, $in{'name2'}, $in{'furigana1'}, $in{'furigana2'}, $in{'e-mail'}, 19$in{'year'} / $in{'month'} / $in{'day'}, $in{'sex'}, $in{'zip1'}-$in{'zip2'}, $in{'jushonm1'}, $in{'jushonm2'}, $in{'jushonm3'}, $in{'tel1'}-$in{'tel2'}-$in{'tel3'}, $in{'question'}\r\n";
}
flock (IN,8);
close (IN);

print "Content-type: text/html\n\n";
print "<HTML>\n";
print "<HEAD>\n";
print "<TITLE>送信完了</TITLE>\n";
print "</HEAD>\n";
print "<BODY>\n";
print "<img src="./inv.GIF" width="400" height="250">\n";
print "<font color="#ff8400" size="4" face="HG丸ゴシックM-PRO">e-sumai.comより５万円キャッシュバック進呈いたします。</font>\n";
print "</BODY>\n";
print "</HTML>\n";

Web作者 2000/06/10(土) 05:14:06
最後の方を以下のようにした感じですか?

print "Content-type: text/html\r\n","\r\n";
print <<HTML;
<HTML>
<HEAD>
<TITLE>送信完了</TITLE>
</HEAD>
<BODY>
<img src="./inv.GIF" width="400" height="250">
<font color="#ff8400" size="4" face="HG丸ゴシックM-PRO">e-sumai.comより５万円キャッシュバック進呈いたします。</font>
<img src="その画像の場所">
</BODY>
</HTML>

HTML

exit;

ひま 2000/06/10(土) 05:18:38
そう言う風に書き加えれば言いのですか?
でも聞きかじったことによると改行(enter)キーを使うのに注意しないと
行けないとか？

D.D. 2000/06/10(土) 05:56:21
>そう言う風に書き加えれば言いのですか?

人を信用しないなら質問するだけ無駄です。

>でも聞きかじったことによると改行(enter)キーを使うのに注意しないと
>行けないとか？

じゃあ、注意してください。
どういうフーに注意するかは聞きかじったとこで聞きましょう。

ヒソカ 2000/06/10(土) 06:12:56
とにかく、方向が見えたらやってみる。
コード書かなきゃプログラミングは出来ないよ。

Web作者 2000/06/10(土) 06:21:40
なんとなく、ひまさんの質問の意味がよくわからないのですが。

想像・・・
上記のソースはとりあえず完成したもので、
そこに「送信しました」の画像を表示したいので
改造するには、どうしたら良いか？
---

ということですか?
それなら上記の感じで良いかと思いますが。
以下のページをご覧下さい。

> そう言う風に書き加えれば言いのですか?
http://www.tohoho-web.com/html/img.htm

> でも聞きかじったことによると改行(enter)キーを使うのに注意しないと
> 行けないとか？
http://www.tohoho-web.com/wwwperl1.htm#EOF
↑のページはサイズが大きいので、
ページが完全に表示されるまでスクロールしないで下さい。

@_@ 2000/06/10(土) 17:47:43
>5つ上
へっだー表示するのに、nph-でもないのに、(ってなぜわかる)
\r\nにする必要は無い->\nだけでいいの。

送信完了をべつにほかの.htmlのやつでええのなら、、
location: http://なんたら～
でええのでは？

Web作者 2000/06/10(土) 17:57:53
> \r\nにする必要は無い->\nだけでいいの。
普通は\n\nでも良いらしいですが、
本来は、\r\n\r\n(\x0D\x0A x2)と記述するらしいです。(by Perlユーザー)
~~~~~

Fuji.♪ [E-Mail] [HomePage] 2000/06/10(土) 18:11:05
単純な疑問なのですが、WWWサーバがMacだった場合、CRLFCRLF(\r\n\r\n)と送ったら改行はいくつになるのでしょうか？
それこそ、\n\nの方がいいような。

＃'\n'が\r\nに置き換えられて送られている、という話だったら敢えて\r\nと記述すると\r\r\n\r\r\nとなる環境がない？とかね。

Web作者 2000/06/10(土) 18:32:28
私もそのPerlユーザーに「本来は\x0D\x0A x2だが、普通は\n\nで良い」
と聞いただけなので、詳しくはわからないので今度聞いてみます。
答えがわかりましたら、また発言させていただきます。

D.D. 2000/06/10(土) 20:23:05
HTML文書を出力するんだからどーでもいいとか。

hima 2000/06/11(日) 13:23:15
[[解決]]
なんとか出来ました．
ありがとうございました．
人を信用していないというわけではなくてこちらの知識不足のために
確認をしたかったため，変な表現になってしまいすみませんでした．

[上に] [前に] [次に]