asp 코드를 php 로 해석을 부탁 드려요.
아래의 asp 코드를 php 코드로 알기쉽게 해석을 부탁 드립니다.
접속부분1
<!--#include virtual="/Ado/CnnStr.asp"-->
<%
sort = Request("sort")
if sort = "" then sort = "1" end if
Set db = Server.CreateObject("ADODB.Connection")
db.Open(gscnnstr)
sort = Request("sort")
if sort = "" then sort = "1" end if
Set db = Server.CreateObject("ADODB.Connection")
db.Open(gscnnstr)
Set db1 = Server.CreateObject("ADODB.Connection")
db1.Open(gscnnstr1)
If sort = "1" then
SQL = "Select * From datamst where ( datyid = 0 or datyid="& session("yid") &")"
SQL = SQL & " Order By datnm Asc"
Else
SQL = "Select * From datamst Where ( datyid = 0 or datyid="& session("yid") &")"
SQL = SQL & " and datgbn='"& sort &"' Order By datnm Asc"
End If
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.PageSize = 10
rs1.Open SQL,db1,1
db1.Open(gscnnstr1)
If sort = "1" then
SQL = "Select * From datamst where ( datyid = 0 or datyid="& session("yid") &")"
SQL = SQL & " Order By datnm Asc"
Else
SQL = "Select * From datamst Where ( datyid = 0 or datyid="& session("yid") &")"
SQL = SQL & " and datgbn='"& sort &"' Order By datnm Asc"
End If
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.PageSize = 10
rs1.Open SQL,db1,1
If Request("pageNo") <> "" Then
Session("curpage") = Request("pageNo")
Else
Session("curpage") = 1
End If
If Not(rs1.EOF Or rs1.BOF) Then
rs1.AbsolutePage = Session("curpage")
numPerPage = 5
totalpage = rs1.PageCount
totalblock = Int(totalpage / numPerPage)
If totalblock = (totalpage / numPerPage ) Then
totalblock = totalblock - 1
End If
If Request("pageNo") <> "" Then
If Request("pageNo") Mod numPerPage = 0 Then
nowblock = Int((Request("pageNo") / numPerPage)) - 1
Else
nowblock = Int(Request("pageNo") / numPerPage)
End If
Else
nowblock=0
End If
End If
%>
Session("curpage") = Request("pageNo")
Else
Session("curpage") = 1
End If
If Not(rs1.EOF Or rs1.BOF) Then
rs1.AbsolutePage = Session("curpage")
numPerPage = 5
totalpage = rs1.PageCount
totalblock = Int(totalpage / numPerPage)
If totalblock = (totalpage / numPerPage ) Then
totalblock = totalblock - 1
End If
If Request("pageNo") <> "" Then
If Request("pageNo") Mod numPerPage = 0 Then
nowblock = Int((Request("pageNo") / numPerPage)) - 1
Else
nowblock = Int(Request("pageNo") / numPerPage)
End If
Else
nowblock=0
End If
End If
%>
접속부분2
<!--#include virtual="/Ado/CnnStr.asp"-->
<%
yyyy = Request("yyyy")
mmmm = Request("mmmm")
sort = Request("sort")
if sort = "" then sort = "1" end if
Set db = Server.CreateObject("ADODB.Connection")
db.Open(gscnnstr)
If sort = "1" then
SQL = "Select * From mydatmst Where mydatyid="& session("yid")
SQL = SQL & " Order By mydatnm Asc"
Else
SQL = "Select * From mydatmst Where mydatyid="& session("yid")
SQL = SQL & " and mydatgbn='"& sort &"' Order By mydatnm Asc"
End If
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 10
rs.Open SQL,db,1
yyyy = Request("yyyy")
mmmm = Request("mmmm")
sort = Request("sort")
if sort = "" then sort = "1" end if
Set db = Server.CreateObject("ADODB.Connection")
db.Open(gscnnstr)
If sort = "1" then
SQL = "Select * From mydatmst Where mydatyid="& session("yid")
SQL = SQL & " Order By mydatnm Asc"
Else
SQL = "Select * From mydatmst Where mydatyid="& session("yid")
SQL = SQL & " and mydatgbn='"& sort &"' Order By mydatnm Asc"
End If
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 10
rs.Open SQL,db,1
If Request("pageNo") <> "" Then
Session("curpage") = Request("pageNo")
Else
Session("curpage") = 1
End If
If Not(rs.EOF Or rs.BOF) Then
rs.AbsolutePage = Session("curpage")
numPerPage = 5
totalpage = rs.PageCount
totalblock = Int(totalpage / numPerPage)
If totalblock = (totalpage / numPerPage ) Then
totalblock = totalblock - 1
End If
If Request("pageNo") <> "" Then
If Request("pageNo") Mod numPerPage = 0 Then
nowblock = Int((Request("pageNo") / numPerPage)) - 1
Else
nowblock = Int(Request("pageNo") / numPerPage)
End If
Else
nowblock=0
End If
End If
%>
Session("curpage") = Request("pageNo")
Else
Session("curpage") = 1
End If
If Not(rs.EOF Or rs.BOF) Then
rs.AbsolutePage = Session("curpage")
numPerPage = 5
totalpage = rs.PageCount
totalblock = Int(totalpage / numPerPage)
If totalblock = (totalpage / numPerPage ) Then
totalblock = totalblock - 1
End If
If Request("pageNo") <> "" Then
If Request("pageNo") Mod numPerPage = 0 Then
nowblock = Int((Request("pageNo") / numPerPage)) - 1
Else
nowblock = Int(Request("pageNo") / numPerPage)
End If
Else
nowblock=0
End If
End If
%>
출력부분
<form name="myform" method="post" action="admin_09_1.asp">
<select name="sort" size="1">
생략
<option value="케럴송" <%if sort="케럴송" then%>Selected<%end if%>>케럴송
<option value="이야기" <%if sort="이야기" then%>Selected<%end if%>>이야기
<option value="궁금증" <%if sort="궁금증" then%>Selected<%end if%>>궁금증
</select>
생략
<option value="케럴송" <%if sort="케럴송" then%>Selected<%end if%>>케럴송
<option value="이야기" <%if sort="이야기" then%>Selected<%end if%>>이야기
<option value="궁금증" <%if sort="궁금증" then%>Selected<%end if%>>궁금증
</select>
생략
<%
i = 1
Do until rs1.EOF Or i>rs1.PageSize
SQL = "Select * From mydatmst Where mydatyid="& Session("yid") &""
SQL = SQL & " and mydatnm='"& rs1("datnm") &"'"
SQL = SQL & " and mydatgbn='"& rs1("datgbn") &"'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 10
rs.Open SQL,db,1
If Not(rs.EOF Or rs.BOF) Then
wol = rs("mydatmonth")
else
wol = ""
end if
%>
i = 1
Do until rs1.EOF Or i>rs1.PageSize
SQL = "Select * From mydatmst Where mydatyid="& Session("yid") &""
SQL = SQL & " and mydatnm='"& rs1("datnm") &"'"
SQL = SQL & " and mydatgbn='"& rs1("datgbn") &"'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 10
rs.Open SQL,db,1
If Not(rs.EOF Or rs.BOF) Then
wol = rs("mydatmonth")
else
wol = ""
end if
%>
<tr onmouseover="style.backgroundColor='#FFFFCC'" onmouseout="style.backgroundColor=''">
<td width="15%" height="23"><p align="center">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"><%=rs1("datgbn")%></span></font></p></td>
<td width="50%" height="23"><p align="left">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"> <%=rs1("datnm")%></span></font></p></td>
<td width="10%" height="23"><p align="center">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"><%=rs1("datmmmm")%></span></font></p></td>
<td width="8%" height="23"><p align="center">
<a href='download.asp?datnm=<%=rs1("datnm")%>&gbn=<%=rs1("datgbn")%>&pageno=<%=Session("curpage")%>'><font face="바탕" size="2" color="#006699">[Down]</font></a></p></td>
<td width="7%" height="23"><p align="center">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"><%=wol%></span></font></p></td>
<td width="10%" height="23"><p align="center">
<%if rs1("datvideo")<>"" then%><a href="javascript:na_open_window('winlvideo', 'video1.asp?filenm=<%=rs1("datnm")%>&gbn=<%=rs1("datgbn")%>', 200, 50, 560, 545, 0, 0, 1, 0, 1)"><img src="../image/video.gif" width="24" height="25" border="0"></a><%else%><a href="javascript:na_open_window('winl1', 'listen1.asp?filenm=<%=rs1("datnm")%>&gbn=<%=rs1("datgbn")%>', 200, 50, 560, 545, 0, 0, 0, 0, 0)"><img src="../image/lstn.gif" width="17" height="21" border="0"></a><%end if%></p></td>
</tr>
<tr><td colspan="6" width="100%" height="2"><img src="../image/table/line.gif" width="100%" height="1"></td></tr>
<%
rs1.MoveNext
i = i + 1
Loop
%>
<tr>
<td width="100%" colspan="6" height="2" background="../image/table/s6.gif"></td>
</tr>
<tr>
<td width="100%" colspan="6" height="35"><p align="center"><% If nowblock > 0 Then %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=1&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_first.gif" align="absmiddle" width="15" height="13" border="0"></a>
<a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(nowblock-1)*numPerPage+1%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_prev.gif" align="absmiddle" width="12" height="11" border="0"></a><% End If %><% If totalblock <> nowblock Then '%><% For k = 1 To numPerPage %><% If (Int(nowblock*numPerPage)+k) = Int(Session("curpage")) Then %><a class="no" href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(Int(nowblock*numPerPage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><b><font face="돋움" size="3" color="#ff0000">[<%=(Int(nowblock*numPerPage)+k)%>]</font></b></a><% Else %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(Int(nowblock*numPerpage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><font face="돋움" size="2" color="#333333">[<%=(Int(nowblock*numPerPage)+k)%>]</font></a><%End If%><%Next%><% Else %><% remainder = totalpage mod numPerPage
If remainder = 0 Then
remainder = numPerPage
End If
For k = 1 To remainder
If (Int(nowblock*numPerPage)+k) = Int(Session("curpage")) Then %><a class="no" href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(int(nowblock*numPerPage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><b><font face="돋움" size="3" color="#ff0000">[<%=(Int(nowblock*numPerPage)+k)%>]</font></b></a><% Else %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(Int(nowblock*numPerPage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><font face="돋움" size="2" color="#333333">[<%=(Int(nowblock*numPerPage)+k)%>]</font></a><% End If
Next
End If%><%If (totalblock > 0) and (nowblock < totalblock) Then %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(nowblock+1)*numPerPage+1%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_next.gif" align="absmiddle" width="12" height="11" border="0"></a>
<a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=totalpage%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_last.gif" align="absmiddle" width="15" height="13" border="0"></a><%End If%></td>
</tr>
</table>
<% end if %>
<td width="15%" height="23"><p align="center">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"><%=rs1("datgbn")%></span></font></p></td>
<td width="50%" height="23"><p align="left">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"> <%=rs1("datnm")%></span></font></p></td>
<td width="10%" height="23"><p align="center">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"><%=rs1("datmmmm")%></span></font></p></td>
<td width="8%" height="23"><p align="center">
<a href='download.asp?datnm=<%=rs1("datnm")%>&gbn=<%=rs1("datgbn")%>&pageno=<%=Session("curpage")%>'><font face="바탕" size="2" color="#006699">[Down]</font></a></p></td>
<td width="7%" height="23"><p align="center">
<font face="바탕" color="#0066CC"><span style="font-size:11pt;"><%=wol%></span></font></p></td>
<td width="10%" height="23"><p align="center">
<%if rs1("datvideo")<>"" then%><a href="javascript:na_open_window('winlvideo', 'video1.asp?filenm=<%=rs1("datnm")%>&gbn=<%=rs1("datgbn")%>', 200, 50, 560, 545, 0, 0, 1, 0, 1)"><img src="../image/video.gif" width="24" height="25" border="0"></a><%else%><a href="javascript:na_open_window('winl1', 'listen1.asp?filenm=<%=rs1("datnm")%>&gbn=<%=rs1("datgbn")%>', 200, 50, 560, 545, 0, 0, 0, 0, 0)"><img src="../image/lstn.gif" width="17" height="21" border="0"></a><%end if%></p></td>
</tr>
<tr><td colspan="6" width="100%" height="2"><img src="../image/table/line.gif" width="100%" height="1"></td></tr>
<%
rs1.MoveNext
i = i + 1
Loop
%>
<tr>
<td width="100%" colspan="6" height="2" background="../image/table/s6.gif"></td>
</tr>
<tr>
<td width="100%" colspan="6" height="35"><p align="center"><% If nowblock > 0 Then %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=1&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_first.gif" align="absmiddle" width="15" height="13" border="0"></a>
<a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(nowblock-1)*numPerPage+1%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_prev.gif" align="absmiddle" width="12" height="11" border="0"></a><% End If %><% If totalblock <> nowblock Then '%><% For k = 1 To numPerPage %><% If (Int(nowblock*numPerPage)+k) = Int(Session("curpage")) Then %><a class="no" href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(Int(nowblock*numPerPage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><b><font face="돋움" size="3" color="#ff0000">[<%=(Int(nowblock*numPerPage)+k)%>]</font></b></a><% Else %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(Int(nowblock*numPerpage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><font face="돋움" size="2" color="#333333">[<%=(Int(nowblock*numPerPage)+k)%>]</font></a><%End If%><%Next%><% Else %><% remainder = totalpage mod numPerPage
If remainder = 0 Then
remainder = numPerPage
End If
For k = 1 To remainder
If (Int(nowblock*numPerPage)+k) = Int(Session("curpage")) Then %><a class="no" href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(int(nowblock*numPerPage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><b><font face="돋움" size="3" color="#ff0000">[<%=(Int(nowblock*numPerPage)+k)%>]</font></b></a><% Else %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(Int(nowblock*numPerPage)+k)%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><font face="돋움" size="2" color="#333333">[<%=(Int(nowblock*numPerPage)+k)%>]</font></a><% End If
Next
End If%><%If (totalblock > 0) and (nowblock < totalblock) Then %><a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=(nowblock+1)*numPerPage+1%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_next.gif" align="absmiddle" width="12" height="11" border="0"></a>
<a href="admin_09_1.asp?sort=<%=sort%>&pageNo=<%=totalpage%>&search=<%=search%>&mykeyword=<%=mykeyword%>"><img src="../image/board_img/paging_last.gif" align="absmiddle" width="15" height="13" border="0"></a><%End If%></td>
</tr>
</table>
<% end if %>
|
댓글을 작성하시려면 로그인이 필요합니다.
로그인
댓글 9개
저코드를 php로 변환하여 알기쉽게 해석을 부탁 드립니다.
Set db = Server.CreateObject("ADODB.Connection")
db.Open(gscnnstr)
Set db1 = Server.CreateObject("ADODB.Connection")
==>>php
function db_connect()
{
global $mysql_host;
global $mysql_user;
global $mysql_password;
global $mysql_db;
$result = new mysqli($mysql_host,$mysql_user,$mysql_password,$mysql_db);
if (!$result)
return false;
$result->autocommit(TRUE);
return $result;
}
$db = db_connect();
1차 서버 접속, 2차 서버접속.
--------------------------------------------------------------------------
SQL = "Select * From datamst where ( datyid = 0 or datyid="& session("yid") &")"
SQL = SQL & " Order By datnm Asc"
--->php
$sql = "Select * From datamst where ( datyid = 0 or datyid="& session("yid") &")";
$sql .= " Order By datnm Asc";
------------------------------------------------------------------------------
numPerPage = 5
totalpage = rs1.PageCount
totalblock = Int(totalpage / numPerPage)
If totalblock = (totalpage / numPerPage ) Then
totalblock = totalblock - 1
==>> php (페이지 구현부분, 모든페이지를 5페이지 단위로 ...)
구누보의 경우...아래 코드와 유사.
$sql = " select distinct wr_parent from $write_table where $sql_search ";
$result = sql_query($sql);
$total_count = mysql_num_rows($result);
$total_page = ceil($total_count / $board[bo_page_rows]); // 전체 페이지 계산
if (!$page) { $page = 1; } // 페이지가 없으면 첫 페이지 (1 페이지)
$from_record = ($page - 1) * $board[bo_page_rows]; // 시작 열을 구함
----------------------------------------------------------------------------
^^ 히히... 그냥 찍었어용... 넘 길어서 ... 끊고 다시 올려용.
저도 정말 문외한.. 잘못되더라도 모라 하진 마세용... 흑흑
Session("curpage") = Request("pageNo")
==>> php
if($page == 0 ){
echo 'page no';
}
===============================================================
1. ""datamst"" 테이블에 접속해서 호출
2. 페이지 계산.
쩝 낼 아침에 서점갈래요...
그럼 즐거운 하루 되세요.
-----------
function db_connect()
{
global $mysql_host;
global $mysql_user;
global $mysql_password;
global $mysql_db;
$result = new mysqli($mysql_host,$mysql_user,$mysql_password,$mysql_db);
if (!$result)
return false;
$result->autocommit(TRUE);
return $result;
}
function cat_all($mta)
{
// 테이터베이스에 원하는 숫자를 불러온다
$conn = db_connect();
$query = $mta;
$result = @$conn->query($query);
if (!$result)
return false;
$num_cats = @$result->num_rows;
if ($num_cats ==0)
return false;
$result = db_array($result);
return $result;
}
function db_array($result)
{
$res_array = array();
for ($count=0; $row = $result->fetch_assoc(); $count++)
$res_array[$count] = $row;
return $res_array;
}
$db = db_connect();
$se_table = "datamst";
$session_yid = $_SESSION['yid'];
$mct = "datyid = '0' ";
$mct .= " or datyid= '$session_yid' ";
$mct .= " Order By datnm Asc ";
$sql = "Select * From $se_table where $mct";
//페이지
$result = sql_query($sql);
$total_count = mysql_num_rows($result)
$PageSize = '10';
$total_page = ceil($total_count / $PageSize);
// 10 개 단위로 불러오는거 같은데..몰겠네요.
if($sort == '1'){ // sort 변수가 1로 올경우만 실행하라는 얘기 인거 같습니다.
$sql = "Select * From $se_table where $mct limit $PageSize"; // 틀린거 같아요..제가.
$cat_row = cat_all($mta=$sql);
}
//$sort 값이 "" 인거와 1 인경우로.....
//중간 생략
위 부분과 유사한데요..
================================================================================
$sort 변수가 "" 인경우와 '1' 인 경우 실행을 하라고 하는거 같은데요..... 더이상 몰겠어요..
여하튼 접속 부분은 ...위에서 사용한 함수랑 유사한 기능을 내포하지 않나 생각해요.
=========
이부분은 특별히 다른건 없는거 같은데요. m,,m
구누보드 list.skin.php 페이지 구현부분가 유사한 구문으로 ...
죄송합니다....요기 까지가 제 한계입니다.