MIL042.php 2.47 KB
<?php 
//*****************************************************************************
//* 
//* プログラム名:Webメール
//* プログラムID:MIL042.php
//* 機能        :個人アドレス帳登録
//* 作成者      :K.Yoshimura
//* 
//*****************************************************************************


include("include/session_start.inc");
include("include/SessionChk.inc");
$strDBinc="include/dbcon.inc";
include($strDBinc);


$strSQLseq="";
$objRecseq="null";
$strSQLIns="";
$objRecIns="null";

if ($kind_flg==1){
	//シーケンスNO作成
	$strSQLseq="Select seq From mail_address_tbl Where syain_cd = '$PHP_SYAIN_CD' Order by seq DESC";

	$objRecseq = pg_exec($strSQLseq);

	if($objRecseq==false){
			echo("SQL実行に失敗しました(SELECT)");
			exit;
	}
	if (pg_numrows($objRecseq) > 0){
		$objseqNo = pg_fetch_object($objRecseq, 0);
		$intseqNo=($objseqNo->seq) +1;
	}else{
		$intseqNo=1;
	}
	
	$strSQLIns = "Insert Into mail_address_tbl " .
		 "(seq,syain_cd,view_name,view_name_kana,mail_address) " .
		 "values (" .
				 "$intseqNo,'$PHP_SYAIN_CD','".addslashes($view_name)."','$name_furi','$e_mail')";

			//echo("strSQL[" . $strSQLIns . "]<BR>");

	$objRecSetIns = pg_exec($strSQLIns);

	if($objRecSetIns==false){
			echo("SQL実行に失敗しました(INSERT)");
			exit;
	}
}elseif($kind_flg==2){
	$strSQLUp = "UPDATE mail_address_tbl SET view_name='".addslashes($view_name)."',view_name_kana='$name_furi',mail_address='$e_mail' ".
				"WHERE seq = $seq and syain_cd='$PHP_SYAIN_CD' ";

		//echo $strSQLUp;
		$objRecUp = pg_exec($strSQLUp);
		if($objRecUp==false){
			echo("SQL実行に失敗しました(UPDATE)");
		exit;
	}
}elseif($kind_flg==3){
	for ($intCnt=0; $intCnt < count($del_seq); $intCnt++){ 
		$strSQL = "Delete FROM mail_address_tbl WHERE seq = $del_seq[$intCnt] and syain_cd='$PHP_SYAIN_CD'";

		$objRec = pg_exec($strSQL);
		if($objRec==false){
			echo("SQL実行に失敗しました(Delete)");
			exit;
		}
	}
}

header("Content-type: text/html; charset=EUC-JP");
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<META http-equiv="Content-Type" content="text/html; charset=EUC-JP">
<META http-equiv="Content-Style-Type" content="text/css">
<link rel="stylesheet" type="text/css" href="basefont.css">
<TITLE>e-グル Webメール</TITLE>
<SCRIPT LANGUAGE="JAVASCRIPT">
<!--
function load_screen(){
	document.e_gru.action = "MIL040.php";
	document.e_gru.method="POST";
	document.e_gru.submit();
}
-->
</SCRIPT>
</HEAD>
<BODY onLoad="return load_screen();">
<form name="e_gru">
</form>
</BODY>
</HTML>