LIN005.php
1.09 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
<?php
//*****************************************************************************
//*
//* プログラム名：リンク集
//* プログラムID：LIN005.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 ($seq_mst != ""){
//シーケンスNO作成
$strSQLdel="Delete From mst_link Where seq=$seq_mst";
$objRecDel = pg_exec($strSQLdel);
if($objRecDel==false){
echo("SQL実行に失敗しました(SELECT)");
exit;
}
$strSQLlink="Delete From link Where seq_mst=$seq_mst";
$objReclink = pg_exec($strSQLlink);
if($objReclink==false){
echo("SQL実行に失敗しました(SELECT)");
exit;
}
}elseif($intsts==1){
//URL削除
$strSQLdel="Delete From link Where seq=$seq";
$objRecDel = pg_exec($strSQLdel);
if($objRecDel==false){
echo("SQL実行に失敗しました(SELECT)");
exit;
}
}
//header("Location:LIN001.php");
?>