掲示板に戻る




顧客情報の管理 for Cart Max V.5.1 投稿者:
お世話になっております、
顧客情報の管理で多少改造をしております。
顧客登録数が増えたため並びを逆にして新規登録者が上に来る様に変更したいと思いますが自力では出来ませんでした。
お知恵をお借りしたくお願い致します。

以下 admin_m.cgi 改造スクリプト抜粋です。

<body>
<div align=center>
<table border="0" cellspacing="2" cellpadding="0" class="haba">
<tr>
<td><a href="javascript:void(0)" onclick="document.fomove_atop.submit();" class="navi">機能\の選択</a> > <a href="javascript:void(0)" onclick="document.fomove_m_memadmin.submit();" class="navi">顧客情報の管理</a> > 顧客情報の管理(変更)</td>
</tr>
</table>
<table border="0" cellspacing="2" cellpadding="0" class="haba">
<tr>
<td align=center class="obi"><b><font color="#ffffff">顧客情報の管理(変更)</font></b></td>
</tr>
</table>

<br>
必要な項目を変更して、「変更する」を押してください。

<form method="POST" action="$mscript">
<input type="hidden" name="pass" value="$FORM{'pass'}">
<input type="hidden" name="mode" value="editmemregist">
<input type="hidden" name="tmpemail" value="$email">
<table cellpadding=4 class="settbl">

<tr>
<td>お名前</td><td width=300><input type="text" name="name1" size=25 value="$name1"></td>
</tr>
<tr>
<td>フリガナ</td><td><input type="text" name="kana1" size=25 value="$kana1"></td>
</tr>
<tr>
<td>法人医院店舗名</td><td><input type="text" name="tenpo" size=40 value="$tenpo"></td>
</tr>
<tr>
<td>部課係営業所名</td><td><input type="text" name="eigyo" size=40 value="$eigyo"></td>
</tr>
<tr>
<td>メールアドレス</td><td><input type="text" name="email" size=40 value="$email"></td>
</tr>
<tr>
<td>同報連絡用アドレス</td><td><input type="text" name="renraku" size=40 value="$renraku"></td>
</tr>
<tr>
<td>郵便番号</td><td><input type="text" name="postal" size=20 value="$postal"></td>
</tr>
<tr>
<td>都道府県</td><td>
<select name="pref">
<option value="">都道府県</option>
EOM


for($i=1;$i<=47;$i++){
     if($i == $pref){
          $sc=" selected";
     }
     else{
          $sc="";
     }
     print "<option value=\"$i\"$sc>$PREF{$i}</option>\n";

}


print <<EOM;
</select>
</td>
</tr>
<tr>
<td>住所</td><td>
<input type="text" name="address" size=40 value="$address">
</td>
</tr>

<tr>
<td>建物名</td><td>
<input type="text" name="address2" size=40 value="$address2">
</td>
</tr>
<tr>
<td>優先電話番号</td><td><input type="text" name="tel" size=20 value="$tel"></td>
</tr>
<tr>
<td>予\備電話番号</td><td><input type="text" name="tel2" size=20 value="$tel2"></td>
</tr>
<tr>
<td>FAX番号</td><td><input type="text" name="fax" size=20 value="$fax"></td>
</tr>
<tr>
<td>パスワード</td><td><input type="password" name="usrpass" size=8 value="$pass"></td>
</tr>
<tr>
<td>ポイント数</td><td><input type="text" name="point" size=8 value="$point"></td>
</tr>
</table>
<br>
<input type=submit value="変更する">
</form>
</div>
<form name="fomove_atop" action="$ascript" method="POST" style="margin:0px">
<input type="hidden" name="pass" value="$FORM{'pass'}">
<input type="hidden" name="mode" value="atop">
</form>
<form name="fomove_m_memadmin" action="$mscript" method="POST" style="margin:0px">
<input type="hidden" name="pass" value="$FORM{'pass'}">
<input type="hidden" name="mode" value="memadmin">
</form>
</body>
</html>

以上宜しくお願い致します。
No.279412018/5/10(Thu) 9:39:18 Res


Re: 顧客情報の管理 for Cart Max V.5.1 投稿者: えふ
admin_m.cgiの
2370行の
unless(open(FILE,$m_log)){
     &error("m_logが開けません。");
}

while(<FILE>){
     ($email,$pass,$kibou,$point,$name1,$name2)=split(/,/,$_);
     print qq(<tr><td width=100>$name1 $name2</td><td width=150>$email</td><td width=100 align=center>$point</td><td align=center width=50><input type="checkbox" name="delnum" value="$email"></td><td align=center width=50><input type="button" value="編集" onclick="Edit('$email')"></td></tr>\n);
}

close FILE;



unless(open(FILE,$m_log)){
     &error("m_logが開けません。");
}
@all=<FILE>;
close FILE;

@all=reverse @all;

foreach(@all){
     ($email,$pass,$kibou,$point,$name1,$name2)=split(/,/,$_);
     print qq(<tr><td width=100>$name1 $name2</td><td width=150>$email</td><td width=100 align=center>$point</td><td align=center width=50><input type="checkbox" name="delnum" value="$email"></td><td align=center width=50><input type="button" value="編集" onclick="Edit('$email')"></td></tr>\n);
}


と変更してください。

No.279462018/5/13(Sun) 9:50:04 Res


Re^2: 顧客情報の管理 for Cart Max V.5.1 投稿者:
ご連絡が遅くなり恐縮です、
早速のご指示有難う御座いました。
残念ながら挙動に変化はありませんでした。
改造が多いための結果だと思います。
暫く自力努力してみます。
No.279492018/5/18(Fri) 15:56:08 Res