罪と罰++二律背反
罪罰改造板2/157
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
] [
リンク元
]
開始行:
*情報欄でコメントのように名前変更を・・・ [#m2bcebad]
-ページ: [[罪罰改造板2]]
-投稿者: [[三毛猫]]
-優先順位: 緊急
-状態: 完了
-カテゴリー: エラーが出ます
-投稿日: 2005-06-21 (火) 23:15:38
-バージョン:
**内容 [#y4f64d0f]
いつも参考にさせていただいてます<(_ _)>
情報のコメントの変更を参考にして、ユーザー名(名前)の変...
userdataに書き込まれないみたいなのですが、&dat_write;等を...
よろしくお願いします<(_ _)>
----
-:スポンサー
-こんな風に改造してみては?情報に
sub infomation_com{
$log .= qq|<b style="color:$color[$camp]">現在の $cmp[$c...
if($com){
if($com =~ /:/){ &error("名前に不正な文字( : )が含まれ...
if($com =~ /;/){ &error("名前に不正な文字( ; )が含まれ...
if($com =~ /,/){ &error("名前に不正な文字( , )が含まれ...
if($com =~ /"/){ &error("名前に不正な文字( \" )が含まれ...
if($com =~ /'/){ &error("名前に不正な文字( ' )が含まれ...
if($com =~ /\//){ &error("名前に不正な文字( / )が含まれ...
if(length($com)>80){ &error("全角40文字までです。",1); }
$com =~ s/\n//g;
$info_mes=$com;
}
if($com2){
if($com2 =~ /:/){ &error("名前に不正な文字( : )が含まれ...
if($com2 =~ /;/){ &error("名前に不正な文字( ; )が含まれ...
if($com2 =~ /,/){ &error("名前に不正な文字( , )が含まれ...
if($com2 =~ /"/){ &error("名前に不正な文字( \" )が含ま...
if($com2 =~ /'/){ &error("名前に不正な文字( ' )が含まれ...
if($com2 =~ /\//){ &error("名前に不正な文字( / )が含ま...
if(length($com2)>16){ &error("全角8文字までです。",1); }
$com2 =~ s/\n//g;
$K=$nm;
$nm=$com2;
$wr_mes ="$date $cmp[$camp] の $K が<font color='yellow...
&hist_write;
}
local(@usrfile,@tdat);
sub infomation_com{・・・・・・・・・
コメントは全角40文字まで。
</form>
<br>
<form method="$method" action="$script" name="ore_">
<input type="hidden" name="id" value="$id">
<input type="hidden" name="pw" value="$pw">
<input type="hidden" name="cmd" value="6">
名前:<input type=text name="com2" class="button2" style...
<input type=submit value="ポチッ/更新" class="button2" s...
<input type=reset value="クリア" class="button2" style=...
<br>
名前は全角8文字まで。
</form><br>
</div>
EOM
-systemのほうに
sub decode {
・・・・・・・・・・・・・
$pw = $in{'pw'};
$cmd = $in{'cmd'};
$com = $in{'com'};
$com2 = $in{'com2'};
-て感じでどうでしょうか?
-できました〜^^ -- [[三毛猫]] &new{2005-06-25 (土) 11:3...
-systemの方の変更が必要だったんですね^^; ありがとうご...
-見てくれる人がいるか不安ですがとりあえず…。hist2.cgiとい...
-解決しました… -- [[six]] &new{2006-10-11 (水) 02:23:57};
-ここを見て真似したのですが、すでにいる同じ名前でも登録で...
-http://mikeneko.skr.jp/kk/2chbbs/kaizou/#9の2を参照で^...
-三毛猫さんありがとうございます。 書いてあるようにしたつ...
-既に上記の$com2を導入している場合は、ちょっとややこしく...
if($com2){
if($com2 =~ /:/){ &error("名前に不正な文字( : )が含まれ...
の、if($com2){が、if($info_nm){にあたります。なので、この...
-三毛猫さんありがとうございます。 成功しました。 -- [[う...
#comment
終了行:
*情報欄でコメントのように名前変更を・・・ [#m2bcebad]
-ページ: [[罪罰改造板2]]
-投稿者: [[三毛猫]]
-優先順位: 緊急
-状態: 完了
-カテゴリー: エラーが出ます
-投稿日: 2005-06-21 (火) 23:15:38
-バージョン:
**内容 [#y4f64d0f]
いつも参考にさせていただいてます<(_ _)>
情報のコメントの変更を参考にして、ユーザー名(名前)の変...
userdataに書き込まれないみたいなのですが、&dat_write;等を...
よろしくお願いします<(_ _)>
----
-:スポンサー
-こんな風に改造してみては?情報に
sub infomation_com{
$log .= qq|<b style="color:$color[$camp]">現在の $cmp[$c...
if($com){
if($com =~ /:/){ &error("名前に不正な文字( : )が含まれ...
if($com =~ /;/){ &error("名前に不正な文字( ; )が含まれ...
if($com =~ /,/){ &error("名前に不正な文字( , )が含まれ...
if($com =~ /"/){ &error("名前に不正な文字( \" )が含まれ...
if($com =~ /'/){ &error("名前に不正な文字( ' )が含まれ...
if($com =~ /\//){ &error("名前に不正な文字( / )が含まれ...
if(length($com)>80){ &error("全角40文字までです。",1); }
$com =~ s/\n//g;
$info_mes=$com;
}
if($com2){
if($com2 =~ /:/){ &error("名前に不正な文字( : )が含まれ...
if($com2 =~ /;/){ &error("名前に不正な文字( ; )が含まれ...
if($com2 =~ /,/){ &error("名前に不正な文字( , )が含まれ...
if($com2 =~ /"/){ &error("名前に不正な文字( \" )が含ま...
if($com2 =~ /'/){ &error("名前に不正な文字( ' )が含まれ...
if($com2 =~ /\//){ &error("名前に不正な文字( / )が含ま...
if(length($com2)>16){ &error("全角8文字までです。",1); }
$com2 =~ s/\n//g;
$K=$nm;
$nm=$com2;
$wr_mes ="$date $cmp[$camp] の $K が<font color='yellow...
&hist_write;
}
local(@usrfile,@tdat);
sub infomation_com{・・・・・・・・・
コメントは全角40文字まで。
</form>
<br>
<form method="$method" action="$script" name="ore_">
<input type="hidden" name="id" value="$id">
<input type="hidden" name="pw" value="$pw">
<input type="hidden" name="cmd" value="6">
名前:<input type=text name="com2" class="button2" style...
<input type=submit value="ポチッ/更新" class="button2" s...
<input type=reset value="クリア" class="button2" style=...
<br>
名前は全角8文字まで。
</form><br>
</div>
EOM
-systemのほうに
sub decode {
・・・・・・・・・・・・・
$pw = $in{'pw'};
$cmd = $in{'cmd'};
$com = $in{'com'};
$com2 = $in{'com2'};
-て感じでどうでしょうか?
-できました〜^^ -- [[三毛猫]] &new{2005-06-25 (土) 11:3...
-systemの方の変更が必要だったんですね^^; ありがとうご...
-見てくれる人がいるか不安ですがとりあえず…。hist2.cgiとい...
-解決しました… -- [[six]] &new{2006-10-11 (水) 02:23:57};
-ここを見て真似したのですが、すでにいる同じ名前でも登録で...
-http://mikeneko.skr.jp/kk/2chbbs/kaizou/#9の2を参照で^...
-三毛猫さんありがとうございます。 書いてあるようにしたつ...
-既に上記の$com2を導入している場合は、ちょっとややこしく...
if($com2){
if($com2 =~ /:/){ &error("名前に不正な文字( : )が含まれ...
の、if($com2){が、if($info_nm){にあたります。なので、この...
-三毛猫さんありがとうございます。 成功しました。 -- [[う...
#comment
ページ名: