<!-- #include virtual = "/db/db.asp" -->
<!-- #include virtual = "/inc/config.asp" -->
<!-- #include virtual = "/inc/func.asp" -->
<!-- #include virtual = "/inc/json2.asp" -->
<!-- #include virtual = "/inc/callPaging.asp" -->
<%
	'********************************************************
	' 변수
	'********************************************************
	wEmpName		= Request.QueryString("wEmpName")
	wListKind		= Request("wListKind")
	wSearchYN		= Request("wSearchYN")
	wSearch			= Request("wSearch")
	wCity			= Request("wCity")
	wArea			= Request("wArea")
	wDanjiNo		= Request("wDanjiNo")
	wDanjiName		= Request("wDanjiName")
	wDanjiCnt		= Request("wDanjiCnt")
	wShopNo			= Request("wShopNo")
	wShopName		= Request("wShopName")
	wShopCnt		= Request("wShopCnt")
	wCountry		= Request("wCountry")
	wMaker			= Request("wMaker")
	wCarClassCode	= Request("wCarClassCode")
	wCarClassName	= Request("wCarClassName")
	wCarCode		= Request("wCarCode")
	wCarName		= Request("wCarName")
	wModelCode		= Request("wModelCode")
	wModelName		= Request("wModelName")
	wModelCnt		= Request("wModelCnt")
	wYYS			= Request("wYYS")
	wYYE			= Request("wYYE")
	wKmS			= Request("wKmS")
	wKmE			= Request("wKmE")
	wAmtS			= Request("wAmtS")
	wAmtE			= Request("wAmtE")
	wAmtYN			= Request("wAmtYN")
	wPhotoYN		= Request("wPhotoYN")
	wSagoYN			= Request("wSagoYN")
	wCarCheckYN		= Request("wCarCheckYN")
	wAutoGbn		= Request("wAutoGbn")
	wGas			= Request("wGas")
	wNumCC			= Request("wNumCC")
	wColor			= Request("wColor")
	wDetailGbn		= Request("wDetailGbn")
	wDetailTxt		= Request("wDetailTxt")
	wOption			= Request("wOption")

	wOrderTmp		= Request("wOrderTmp")
	wCurPage		= Request("wCurPage")
	wOrderSection	= Request("wOrderSection")
	wOrderState		= Request("wOrderState")
	wKind			= Request("wKind")

	wOldCarNo		= Request("wOldCarNo")

	wLnbGbn = "1"

	If wPageSize > "100" Then 
		Response.End 
	End If 

	If wListKind = "" Then
		wListKind ="icon"
	End If

	wSearch = " Where DemoType = '광고제시' And DemoYN = 'Y' And UseYN = 'Y' and carcode <> 0 and a.oldcarno = b.oldcarno "

	If wCity <> "" Then
		wSearch = wSearch & " and a.City = '"& wCity &"' "
		wPageStr = wPageStr & "&wCity="& wCity

		wPrint = wPrint &"&wCity="& wCity
	End If

	If wArea <> "" Then
		wSearch = wSearch & " and a.Area = '"& wArea &"' "
		wPageStr = wPageStr & "&wArea="& wArea
		wPrint = wPrint &"&wArea="& wArea
	End If

	If wDanjiNo <> "" Then
		wSearch = wSearch & " and a.DanjiNo = "& wDanjiNo &" "
		wPageStr = wPageStr & "&wDanjiNo="& wDanjiNo &"&wDanjiName="& wDanjiName &"&wDanjiCnt="& wDanjiCnt

		wPrint = wPrint &"&wDanjiNo="& wDanjiNo &"&wDanjiName="& wDanjiName &"&wDanjiCnt="& wDanjiCnt
	End If

	If wShopNo <> "" Then
		wSearch = wSearch & " and a.ShopNo = "& wShopNo &" "
		wPageStr = wPageStr & "&wShopNo="& wShopNo &"&wShopName="& wShopName &"&wShopCnt="& wShopCnt

		wPrint = wPrint &"&wShopNo="& wShopNo &"&wShopName="& wShopName &"&wShopCnt="& wShopCnt
	End If

	If wCountry <> "" Then
		If wCountry = "국산" Then
			wSearch = wSearch & " and a.Country = '한국' "
		Else
			wSearch = wSearch & " and a.Country <> '한국' "
		End If

		wPageStr = wPageStr & "&wCountry="& wCountry

		wPrint = wPrint &"&wCountry="& wCountry
	End If

	If wMaker <> "" Then
		wSearch = wSearch & " and a.MakerCode = '"& wMaker &"' "
		wPageStr = wPageStr & "&wMaker="& wMaker

		wPrint = wPrint &"&wMaker="& wMaker
	End If

	If CStr(wCarClassCode) <> "" Then
		If wCountry = "" Then
			sql = ""
			sql = sql & "  select top 1 country from nextcar..tbl_carname where CarClassCode = '"& wCarClassCode &"' "
			Set rs = dbc.execute(sql)
			If rs.bof And rs.eof Then

			Else
				rsCountry = rs("Country")
			End If

			If rsCountry = "한국" Then
				wSearch = wSearch & " and a.CarClassCode = '"& wCarClassCode &"' "
			Else
	'			wSearch = wSearch & " and a.CarClassCode = '"& wCarClassCode &"' "
	'			wSearch = wSearch & " and a.CarCode in (select carcode from autodb.nextcar.dbo.carname where carclasscode2 = '"& wCarClassCode &"') "
			End If
		ElseIf wCountry = "국산차" Then
			wSearch = wSearch & " and a.CarClassCode = '"& wCarClassCode &"' "
		ElseIf wCountry = "수입차" Then
'			wSearch = wSearch & " and a.CarClassCode = '"& wCarClassCode &"' "
'			wSearch = wSearch & " and a.CarCode in (select carcode from autodb.nextcar.dbo.carname where carclasscode2 = '"& wCarClassCode &"') "
		End If
		wPageStr = wPageStr & "&wCarClassCode="& wCarClassCode &"&wCarClassName="& wCarClassName

		wPrint = wPrint &"&wCarClassCode="& wCarClassCode &"&wCarClassName="& wCarClassName
	End If

	If wCarCode <> "" Then
		wSearch = wSearch & " and a.CarCode = '"& wCarCode &"' "
		wPageStr = wPageStr & "&wCarCode="& wCarCode &"&wCarName="& wCarName

		wPrint = wPrint &"&wCarCode="& wCarCode &"&wCarName="& wCarName
	End If

	If wModelCode <> "" Then
		wSearch = wSearch & " and a.ModelCode = "& wModelCode &" "
		wPageStr = wPageStr & "&wModelCode="& wModelCode &"&wModelName="& wModelName &"&wModelCnt="& wModelCnt

		wPrint = wPrint &"&wModelCode="& wModelCode &"&wModelName="& wModelName &"&wModelCnt="& wModelCnt
	End If

	If wYYS <> "" Then
		If wMMS = "" Then
			wSearch = wSearch & " and substring(a.YYMM,1,4) >= '"& wYYS &"' "
		Else
			wSearch = wSearch & " and a.YYMM >= '"& wYYS & wMMS &"' "
		End If

		wPageStr = wPageStr & "&wYYS="& wYYS &"&wMMS="& wMMS

		wPrint = wPrint &"&wYYS="& wYYS &"&wMMS="& wMMS
	End If

	If wYYE <> "" Then
		If wMME = "" Then
			wSearch = wSearch & " and substring(a.YYMM,1,4) <= '"& wYYE &"' "
		Else
			wSearch = wSearch & " and a.YYMM <= '"& wYYE & wMME &"' "
		End If

		wPageStr = wPageStr & "&wYYE="& wYYE &"&wMME="& wMME

		wPrint = wPrint &"&wYYE="& wYYE &"&wMME="& wMME
	End If

	If wKmS <> "" And wKmE = "" Then
		wSearch = wSearch & " and a.Km >= '"& wKmS &"' "
	ElseIf wKmS = "" And wKmE <> "" Then
		wSearch = wSearch & " and a.Km <= '"& wKmE &"' "
	ElseIf wKmS <> "" And wKmE <> "" Then
		wSearch = wSearch & " and a.Km between '"& wKmS &"' and '"& wKmE &"' "
	End If

	wPageStr = wPageStr & "&wKmS="& wKmS &"&wKmE="& wKmE

	wPrint = wPrint &"&wKmS="& wKmS &"&wKmE="& wKmE

	If wAmtYN = "Y" Then 
		wSearch = wSearch & " and a.DealerAmt > 31 "
		wPageStr = wPageStr & "&wAmtYN="& wAmtYN
		wPrint = wPrint & "&wAmtYN="& wAmtYN
	End If 

	If wAmtS <> "" And wAmtE <> "" Then
		wSearch = wSearch & " and a.DealerAmt between "& wAmtS &" and "& wAmtE &" "

		wPageStr = wPageStr & "&wAmtS="& wAmtS & "&wAmtE=" & wAmtE

		wPrint = wPrint & "&wAmtS="& wAmtS & "&wAmtE=" & wAmtE
	End If

	If wPhotoYN = "Y" Or gConfigPhotoYN = "Y" Then
		wSearch = wSearch & " and charindex('U',a.ImageFlag) > 0 "

		wPageStr = wPageStr & "&wPhotoYN="& wPhotoYN

		wPrint = wPrint &"&wPhotoYN="& wPhotoYN
	End If

	If wSagoYN = "Y" Then
		wSearch = wSearch & " and a.SagoYN = 'N' "

		wPageStr = wPageStr & "&wSagoYN="& wSagoYN

		wPrint = wPrint &"&wSagoYN="& wSagoYN
	End If

	If wCarCheckYN = "Y" Then
		wSearch = wSearch & " and isnull(a.CarCheckNo,'') <> '' "

		wPageStr = wPageStr & "&wCarCheckYN="& wCarCheckYN

		wPrint = wPrint &"&wCarCheckYN="& wCarCheckYN
	End If

	If wAutoGbn <> "" Then
		wSearch = wSearch & " and a.AutoGbn = '"& wAutoGbn &"' "

		wPageStr = wPageStr & "&wAutoGbn="& wAutoGbn

		wPrint = wPrint &"&wAutoGbn="& wAutoGbn
	End If

	If wGas <> "" Then
		wSearch = wSearch & " and a.Gas = '"& wGas &"' "

		wPageStr = wPageStr & "&wGas="& wGas

		wPrint = wPrint &"&wGas="& wGas
	End If

	If wNumCC <> "" Then
		arrNumCC = Split(wNumCC,",")

		wSearch = wSearch & " and a.NumCC between "& arrNumCC(0) &" and "& arrNumCC(1) &" "

		wPageStr = wPageStr & "&wNumCC="& wNumCC

		wPrint = wPrint &"&wNumCC="& wNumCC
	End If

	If wColor <> "" Then
		wSearch = wSearch & " and a.Color = '"& wColor &"' "

		wPageStr = wPageStr & "&wColor="& wColor

		wPrint = wPrint &"&wColor="& wColor
	End If

	If wKind <> "" Then
		wSearch = wSearch & " and a.UseCode = '"& wKind &"' "

		wPageStr = wPageStr & "&wKind="& wKind

		wPrint = wPrint &"&wKind="& wKind
	End If

	If wEmpName <> "" Then
		wSearch = wSearch & " and a.EmpName = '"& wEmpName &"' "

		wPageStr = wPageStr & "&wEmpName="& wEmpName

		wPrint = wPrint &"&wEmpName="& wEmpName
	End If

	If wOldCarNo <> "" Then
		wSearch = wSearch & " and a.OldCarNo = '"& wOldCarNo &"' "

		wPageStr = wPageStr & "&wOldCarNo="& wOldCarNo

		wPrint = wPrint &"&wOldCarNo="& wOldCarNo
	End If

	intTCnt		= 0
	intPageCnt	= 0
	intPageView = 10

	If wCurPage = "" Then wCurPage = 1 End If

	If wPageSize = "" Then
		intPageSize = 50
	Else
		intPageSize = wPageSize
	End If

	wPageStr = wPageStr & "&wPageSize="& wPageSize

	If wOrderTmp = "" Then
'		wOrder = "a.ImageFlag desc, a.carcheckNo desc, a.strDemoDay desc "
		wOrder = "a.ImageFlag desc, a.strDemoDay desc"
	Else
		wOrder = wOrderTmp
	End If

	'********************************************************
	' 차량 목록 총 개수
	'********************************************************
	sql = ""
	sql = sql & " SELECT COUNT(DemoNo) AS TotCnt "
	sql = sql & " FROM UsedCar..TBL_Car_DemoMaster a (nolock), UsedCar..TBL_CertUsedCar b "& wSearch &" "

	Set res = dbcon.Execute(sql)

	intTCnt = CDbl(res("TotCnt"))

	res.close
	Set res = Nothing

	'********************************************************
	' 페이징 처리
	'********************************************************
	If intTCnt > 0 Then
		If (intTCnt Mod intPageSize) = 0 Then
			intPageCnt = int(intTCnt/intPageSize)
		Else
			intPageCnt = int(intTCnt/intPageSize)+1
		End If
	End If

	wPageSt = (wCurPage-1)*intPageSize+1
	wPageEd = wPageSt+intPageSize-1

	sql = ""
	sql = sql & " with result as ( "
	sql = sql & "					SELECT ROW_NUMBER() OVER (ORDER BY "& wOrder &") AS ROWNUM, a.*, "
	sql = sql & "						(SELECT ShortName FROM UsedCar..tbl_DanjiInfo WHERE DanjiNo = a.DanjiNo) AS DanjiName, "
	sql = sql & "						(SELECT ShopShortName FROM UsedCar..tbl_ShopInfo WHERE ShopNo = a.ShopNo) AS ShopName, "
	sql = sql & "						(SELECT MakerName FROM UsedCar..tbl_Car_Maker WHERE MakerCode = a.MakerCode) AS MakerName, "
	sql = sql & "						(SELECT CarName FROM UsedCar..tbl_Car_Name WHERE CarCode = a.CarCode) AS CarName, "
	sql = sql & "						(SELECT ModelName FROM UsedCar..tbl_Car_Model WHERE ModelCode = a.ModelCode) AS ModelName, "
	sql = sql & "						(SELECT GradeName FROM UsedCar..tbl_Car_Grade WHERE ModelCode = a.ModelCode and GradeCode = a.GradeCode) AS GradeName "
	sql = sql & "						FROM UsedCar..TBL_Car_DemoMaster a (nolock), UsedCar..TBL_CertUsedCar b "& wSearch &" "
	sql = sql & "					)  "
	sql = sql & " select * from result where rownum BETWEEN "&wPageSt&" AND "&wPageEd&" order by rownum "

	If Request.ServerVariables("REMOTE_ADDR") = "112.187.225.76" Then
'		Response.write sql
	End If

	Set mres = dbcon.Execute(sql)
%>
<!doctype html>
<html lang="ko">
 <head>
	<meta charset="euc-kr" />
	<meta http-equiv="X-UA-Compatible" content="IE=edge" />
	<meta name="viewport" content="width=1200, user-scalable=yes">

	<meta name="title" content="(사)전국자동차매매사업조합연합회">
	<meta name="Author" content="(사)전국자동차매매사업조합연합회">
	<meta name="Keywords" content="중고차매물공유,카매니저,딜러노트,딜러사이트">
	<meta name="Description" content="전국자동차매매사업조합연합회 오신것을 환영합니다.">

	<meta property="og:type" content="website">
	<meta property="og:title" content="(사)전국자동차매매사업조합연합회">
	<meta property="og:description" content="전국자동차매매사업조합연합회 오신것을 환영합니다.">
	<meta property="og:image" content="/image/common/logo.png">
	<meta property="og:url" content="">

	<title>(사)전국자동차매매사업조합연합회</title>
	<link rel="stylesheet" type="text/css" href="/css/common.css" />
	<link rel="stylesheet" type="text/css" href="/css/sub.css" />
	<link rel="shortcut icon" href="/images/favicon.ico">
	<script type="text/javascript" src="/js/jquery.1.11.0.js"></script>
	<script type="text/javascript" src="/js/jquery.cookie.js"></script>
	<script type="text/javascript" src="/js/jquery.placeholder.min.js"></script>
	<script type="text/javascript" src="/js/common.js"></script>
	<script type="text/javascript" src="/js/jquery.modal.js"></script>
	<script type="text/javascript">
		$(function() {
			// 검색조건 변경
			loadData = function(obj, val) {
				if (obj == 'city') {
					$.post('/data/area.asp?area='+escape(val)+'', function(data) {
						$('select[name=wArea]').empty().append(data);
					}, 'html');
					$.post('/data/danji.asp?city='+escape(val)+'', function(data) {
						$('select[name=wDanjiNo]').empty().append(data);
					}, 'html');
				} else if (obj == 'area') {
					$.post('/data/danji.asp?city='+escape($('select[name=wCity]').val())+'&area='+escape(val), function(data) {
						$('select[name=wDanjiNo]').empty().append(data);
					}, 'html');
				} else if (obj == 'country') {
					$.post('/data/maker.asp?country='+escape(val)+'', function(data) {
						$('select[name=wMaker]').empty().append(data);
					}, 'html');
				} else if (obj == 'maker') {
					$.post('/data/carcode.asp?makercode='+val+'', function(data) {
						$('select[name=wCarCode]').empty().append(data);
						$('select[name=wModelCode]').empty().append('<option value="">모델</option>');
					}, 'html');
				} else if (obj == 'carcode') {
					$.post('/data/modelcode.asp?carcode='+val+'', function(data) {
						$('select[name=wModelCode]').empty().append(data);
						$('select[name=wGradeCode]').empty().append('<option value="">등급</option>');
					}, 'html');
				} else if (obj == 'modelcode') {
					$.post('/data/grade.asp?modelcode='+val+'', function(data) {
						$('select[name=wGradeCode]').empty().append(data);
					}, 'html');
				}
			}
		});
	</script>
 </head>
 <body>
	<div id="wrap">
		<!--#include virtual="/inc/header.asp"--> 

		<div id="container">
			<div class="path">
				<div class="path-in">
					<ul>
						<li class="home"><a href="javascript:;">HOME</a> </li>
						<li class="depth01"><a href="javascript:;">인증중고차검색</a></li>
					</ul>
				</div>
				
			</div>
			<div class="content">


					<div class="search-box">
						<h3>인증중고차 검색</h3>
			<script type="text/javascript">
				function onSubmit() {
					document.searchform.wOrderSection.value = '';
					document.searchform.wOrderState.value = '';
					document.searchform.wSearchYN.value="Y";
					document.searchform.submit();
				}
			</script>
			<form name="searchform" method="get" action="/search/search_cert.asp">
				<input type="hidden" name="wListKind" value="<%= wListKind %>" />
				<input type="hidden" name="wSearchYN" value="<%= wSearchYN %>" />
				<input type="hidden" name="wCarClassName" value="<%= wCarClassName %>" />
				<input type="hidden" name="wCarName" value="<%= wCarName %>" />
				<input type="hidden" name="wModelName" value="<%= wModelName %>" />
				<input type="hidden" name="wPageSize" value="<%= wPageSize %>" />
				<input type="hidden" name="wOrderTmp" value="<%= wOrderTmp %>" />
				<input type="hidden" name="wOrderSection" value="<%= wOrderSection %>" />
				<input type="hidden" name="wOrderState" value="<%= wOrderState %>" />
						<div class="finder_box1-1">
							

							
							<dl class="make">
								<dt>제조사</dt>
								<dd>
									<select name="wMaker" onchange="loadData('maker', this.value);" multiple class="car-type " size="6">
									<%
										'----------------------------------
										'@ 제조사
										'----------------------------------
										sql = " select makername,makercode "
										sql = sql & " from usedcar.dbo.tbl_car_maker "
										sql = sql & " where useyn = 'Y' "
										sql = sql & " order by "
										sql = sql & " case when makername = '현대' then makername end desc, "
										sql = sql & " case when makername = '기아' then makername end desc, "
										sql = sql & " case when makername = '르노삼성' then makername end desc, "
										sql = sql & " case when makername = '쉐보레(GM대우)' then makername end desc, "
										sql = sql & " case when makername = '쌍용' then makername end desc, "
										sql = sql & " case when makername = '대우' then makername end desc, "
										sql = sql & " case when makername = 'BMW' then makername end desc, "
										sql = sql & " case when makername = '벤츠' then makername end desc, "
										sql = sql & " case when makername = '아우디' then makername end desc, "
										sql = sql & " case when makername = '폭스바겐' then makername end desc, "
										sql = sql & " case when makername = '인피니티' then makername end desc, "
										sql = sql & " case when makername = '렉서스' then makername end desc, "
										sql = sql & " case when makername = '혼다' then makername end desc, "
										sql = sql & " case when makername = '푸조' then makername end desc, "
										sql = sql & " makername "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value="""">전체</option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
												If res("makercode") = wMaker Then
													Response.Write "<option value="""& res("makercode") &""" selected=""selected"">"& res("makername") &"</option>"
												Else
													Response.Write "<option value="""& res("makercode") &""">"& res("makername") &"</option>"
												End If
												res.MoveNext
											Loop
										End If

										res.Close
										Set res = Nothing
									%>
									</select>
								</dd>
							</dl>
							<dl class="carname">
								<dt>차명</dt>
								<dd>
									<select multiple name="wCarCode" class="car-type " size="6" onchange="loadData('carcode', this.value);">
								<%
									'----------------------------------
									'@ 차명
									'----------------------------------
									If wMaker <> "" Then 
										sql = ""
										sql = " select carcode, carname "
										sql = sql & " from usedcar.dbo.tbl_car_name "
										sql = sql & " where useyn = 'Y' "
										sql = sql & " and makercode = '"& wMaker &"' "
										sql = sql & " group by carcode, carname "
										sql = sql & " order by carname "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value="""">전체</option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
												If CStr(res("carcode")) = wCarCode Then
													Response.Write "<option value="""& res("carcode") &""" selected=""selected"">"& res("carname") &"</option>"
												Else
													Response.Write "<option value="""& res("carcode") &""">"& res("carname") &"</option>"
												End If
												res.MoveNext
											Loop
										End If

										res.Close
										Set res = Nothing
									Else 
										Response.Write "<option value="""">선택</option>"
									End If 
								%>
									</select>
								</dd>
							</dl>

							<dl class="carmodel">
								<dt>모델</dt>
								<dd>
									<select multiple name="wModelCode" class="car-type " size="6" onchange="loadData('modelcode', this.value);">
								<%
									'----------------------------------
									'@ 모델명
									'----------------------------------
									If wCarCode <> "" Then 
										sql = ""
										sql = " select modelcode, modelname "
										sql = sql & " from usedcar.dbo.tbl_car_model "
										sql = sql & " where useyn = 'Y' "
										sql = sql & " and carcode = "& wCarCode &" "
										sql = sql & " group by modelcode, modelname "
										sql = sql & " order by modelname "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value="""">전체</option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
												If CStr(res("modelcode")) = wModelCode Then
													Response.Write "<option value="""& res("modelcode") &""" selected=""selected"">"& res("modelname") &"</option>"
												Else
													Response.Write "<option value="""& res("modelcode") &""">"& res("modelname") &"</option>"
												End If
												res.MoveNext
											Loop
										End If

										res.Close
										Set res = Nothing
									Else 
										Response.Write "<option value="""">선택</option>"
									End If 
								%>
									</select>
								</dd>
								
							</dl>

							<dl class="rating">
								<dt>등급</dt>
								<dd>
									<select multiple name="wGradeCode" class="car-type " size="6">
								<%
									'----------------------------------
									'@ 등급
									'----------------------------------
									If wModelCode <> "" Then 
										sql = ""
										sql = " select gradecode, gradename "
										sql = sql & " from usedcar.dbo.tbl_car_grade "
										sql = sql & " where useyn = 'Y' "
										sql = sql & " and modelcode = "& wModelCode &" "
										sql = sql & " group by gradecode, gradename "
										sql = sql & " order by gradename "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value="""">전체</option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
												If CStr(res("gradecode")) = wGradeCode Then
													Response.Write "<option value="""& res("gradecode") &""" selected=""selected"">"& res("gradename") &"</option>"
												Else
													Response.Write "<option value="""& res("gradecode") &""">"& res("gradename") &"</option>"
												End If
												res.MoveNext
											Loop
										End If

										res.Close
										Set res = Nothing
									Else 
										Response.Write "<option value="""">선택</option>"
									End If 
								%>
									</select>
								</dd>
							</dl>

							
							
							<ul class="option1">
								<li><span>차량가격</span>
									<input type="text" name="wAmtS" value="<%=wAmtS%>">
									-
									<input type="text" name="wAmtE" value="<%=wAmtE%>">
									
								</li>
								<li>
									<span>변속기</span>
									<select name="wAutoGbn">
									<%
										'@ 변속기
										sql = " Select CodeGroupName, CodeGroupNo, CodeName, CodeNo From USEDCAR..TBL_CommonCode "
										sql = sql & " Where GroupCode = '010' And UseYN = 'Y' "
										sql = sql & " Order by CodeGroupNo "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value=""""></option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
%>
												<option value="<%=res("CodeName")%>" <% If wAutoGbn = res("CodeName") Then %> selected <% End If %>><%=res("CodeName")%></option>
<%
												res.MoveNext
											Loop
										End If
									%>
									</select>
								</li>
								<li><span>일반인LPG</span>
									<select name="wLPG" style="width:80px; background: url(/images/arrow.png) #fff no-repeat 55px;">
										<option value=""></option>
										<option value="Y" <% If wLPG = "Y" Then %> selected <% End If %>>Y</option>
										<option value="N" <% If wLPG = "N" Then %> selected <% End If %>>N</option>
									</select>
								</li>
								<li><span>차량번호</span>
									<input type="text" value="<%=wOldCarNo%>" name="wOldCarNo">
								</li>
								
								
							</ul>

							<ul class="option2">
								<li><span>차량년식</span>
										<select name="wYYS">
											<option value="">년</option>
										<%
											'@ 년도
											If wYYS = "" Then 
												wYYS = "0"
											End If 
											wYear = Year(Date())
											For iYear = wYear+1 To 1980 Step -1
										%>
											<option value="<%= iYear %>" <% If CInt(wYYS) = iYear Then %> selected <% End If %>><%= iYear %></option>
										<%
											Next
										%>
										</select>
										~
										<select name="wYYE">
											<option value="">년</option>
										<%
											'@ 년도
											If wYYE = "" Then 
												wYYE = "0"
											End If 
											wYear = Year(Date())
											For iYear = wYear+1 To 1980 Step -1
										%>
											<option value="<%= iYear %>" <% If CInt(wYYE) = iYear Then %> selected <% End If %>><%= iYear %></option>
										<%
											Next
										%>
										</select>
									
								</li>
								<li>
									<span>사용연료</span>
									<select name="wGas">
									<%
										'@ 연료
										sql = " Select CodeGroupName, CodeGroupNo, CodeName, CodeNo From USEDCAR..TBL_CommonCode "
										sql = sql & " Where GroupCode = '011' And UseYN = 'Y' "
										sql = sql & " Order by CodeGroupNo "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value=""""></option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
%>
												<option value="<%=res("CodeName")%>" <% If wGas = res("CodeName") Then %> selected <% End If %>><%=res("CodeName")%></option>
<%
												res.MoveNext
											Loop
										End If
									%>
									</select>
								</li>
								<li><span>주행거리</span>
									<input type="text" name="wKmS" value="<%=wKmS%>">
									-
									<input type="text" name="wKmE" value="<%=wKmE%>">
								</li>
							</ul>
							<ul class="option3">
								<li><span class="our-town">우리동네 매물찾기</span>
									
								</li>
								<li><span class="town">시도</span>
									<select name="wCity" onchange="loadData('city', this.value);">
									<%
										'----------------------------------
										'@ 시도
										'----------------------------------
										sql = " Select CodeGroupName, CodeGroupNo From USEDCAR..TBL_CommonCode "
										sql = sql & " Where GroupCode = '002' And UseYN = 'Y' "
										sql = sql & " Group by CodeGroupName, CodeGroupNo "
										sql = sql & " Order by CodeGroupNo "

										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value="""">전체</option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
												If res("CodeGroupName") = wCity Then
													Response.Write "<option value="""& res("CodeGroupName") &""" selected=""selected"">"& res("CodeGroupName") &"</option>"
												Else
													Response.Write "<option value="""& res("CodeGroupName") &""">"& res("CodeGroupName") &"</option>"
												End If
												res.MoveNext
											Loop
										End If

										res.Close
										Set res = Nothing
									%>
									</select>
								</li>
								<li>
									<span class="town">지역</span>
									<select name="wArea" onchange="loadData('area', this.value);">
									<%
										'----------------------------------
										'@ 지역
										'----------------------------------
										sql = " Select CodeGroupName, CodeGroupNo, CodeName, CodeNo From USEDCAR..TBL_CommonCode "
										sql = sql & " Where GroupCode = '002' And UseYN = 'Y' "
										If wCity <> "" Then 
											sql = sql & " And CodeGroupName = '"&wCity&"' "
										End If 

										sql = sql & " Order by CodeGroupNo "
										Set res = dbcon.Execute(sql)

										If res.Eof Or res.Bof Then
											Response.Write "<option value="""">전체</option>"
										Else
											Response.Write "<option value="""">전체</option>"
											Do While Not res.Eof
												If CStr(res("CodeName")) = wArea Then
													Response.Write "<option value="""& res("CodeName") &""" selected=""selected"">"& res("CodeName") &"</option>"
												Else
													Response.Write "<option value="""& res("CodeName") &""">"& res("CodeName") &"</option>"
												End If
												res.MoveNext
											Loop
										End If

										res.Close
										Set res = Nothing
									%>
									</select>
								</li>
								<li><span>매매단지명</span>
									<select name="wDanjiNo" >
									<%
										If wCity <> "" Or wArea <> "" Then 
											'----------------------------------
											'@ 단지정보
											'----------------------------------
											sql = ""
											sql = " select danjino, danjiname "
											sql = sql & " from usedcar.dbo.tbl_danjiinfo "
											sql = sql & " where useyn = 'Y' "

											If wGovNo <> "" Then 
											sql = sql & " and govno = '"& reqGovNo &"' "
											End If 

											If wCity <> "" Then 
											sql = sql & " and City = '"& wCity &"' "
											End If 

											If wArea <> "" Then 
											sql = sql & " and Area = '"& wArea &"' "
											End If 

											sql = sql & " group by danjino, danjiname "
											sql = sql & " order by danjiname "

											Set res = dbcon.Execute(sql)

											If res.Eof Or res.Bof Then
												Response.Write "<option value="""">단지</option>"
											Else
												Do While Not res.Eof
													If CStr(res("danjino")) = wDanjiNo Then
														Response.Write "<option value="""& res("danjino") &""" selected=""selected"">"& res("danjiname") &"</option>"
													Else
														Response.Write "<option value="""& res("danjino") &""">"& res("danjiname") &"</option>"
													End If
													res.MoveNext
												Loop
											End If

											res.Close
											Set res = Nothing
										Else
											Response.Write "<option value="""">단지</option>"
										End If 
									%>
									</select>
								</li>
								</li><li class="finder_list_btn">
									<p class="btn1"><a href="javascript:;" onclick="onSubmit()">검 색</a></p>
									<p class="btn2"><a href="/search/search_cert.asp">초기화</a></p>
									
								</li>
							</ul>

						</div>
						
					</form>
				</div>
		
				<div class="search-list">
				<div class="search_list">
					<div class="list_top">
						<div class="top_left">
							<!--<span class="txt_btn"><a href="javascript:;" onclick="window.open('/search/compare.asp','_blank','toolbar=no,location=no,status=no,menubar=no,scrollbars=auto,resizable=no,directories=no,width=952,height=862')" rel="">선택매물 비교</a></span>-->
							<span class="txt1">전체 <b><%=FormatNumber(intTCnt,0)%></b>대</span><span></span>
						</div>
					</div>

					<table class="one_list">
						<caption></caption>
						<colgroup>
							<col width="110">
							<col width="420">
							<col width="80">
							<col width="80">
							<col width="80">
							<col width="80">
							<col width="80">
							<col width="180">
						</colgroup>
						<tbody>
							<tr>
								<th>사진</th>
								<th>차량정보</th>
								<th>미션</th>
								<th>년식</th>
								<th>연료</th>
								<th>주행거리</th>
								<th>가격</th>
								<th>담당자(연락처)</th>
							</tr>
<%	'매물수량
		If mres.eof Or mres.bof Then
		Else
			rowCnt = intTCnt - ((wCurPage - 1) * intPageSize)
			i = 1
			Do While mres.eof = False
				mresDemoNo = mres("DemoNo")
				mresMaker = mres("MakerName")
				mresCarName = mres("CarName")
				mresModelName = mres("ModelName")
				mresGradeName = mres("GradeName")
				mresImageFlag = mres("ImageFlag")
				mresImagePath = mres("ImagePath")
				mresSago = mres("SagoYN")
				mresSagoMemo = mres("SagoMemo")
				mresCarCheckYN = mres("CarCheckYN")
				mresCarCheckNo = mres("CarCheckNo")
				mresOptionText = mres("CarDetailOption")
				mresLineDemo = mres("LineDemo")
				mresYYMM = mres("YYMM")
				mresColor = mres("Color")
				mresAutoGbn = mres("AutoGbn")
				mresGas = mres("Gas")
				mresDealerAmt = mres("DealerAmt")
				mresDemoAmt = mres("DemoAmt")
				mresKm = mres("Km")
				mresCity = mres("Area")
				mresDanjiName = mres("DanjiName")
				mresShopNo = mres("ShopNo")
				mresShopName = mres("ShopName")
				mresEmpNo = mres("EmpNo")
				mresEmpName = mres("EmpName")
				mresEmpHand = mres("EmpMobileNum")
				mresDemoDay = mres("DemoDay")
				mresStrDemoDay = mres("strDemoDay")
				mresDealerAmt = mres("DealerAmt")
				mresImagePath = mres("ImagePath")
				mresCarDetailOption = mres("CarDetailOption")
				mresGovNo = mres("GovNo")
				mresOldCarNo = mres("OldCarNo")

				strCarName = mresCarName&" "&mresModelName&" "&mresGradeName
				strCarOpion = mresCarDetailOption
				if mresKm > 9999 then
					mresKm =  Round(mresKm/10000,1) & "만"
				else
					mresKm =  fix(mresKm)
				end If

				wDemoDay = Mid(mresDemoDay,1,4)&"."&Mid(mresDemoDay,5,2)&"."&Mid(mresDemoDay,7,2)

				If mresDemoAmt < 31 Then 
					wDemoAmt = "상담"
				Else
					wDemoAmt = FormatNumber(mresDemoAmt,0)&"만원"
				End If 

				If mresGovNo = "70" Or mresGovNo = "11" Then 
					sql = ""
					sql = sql & " SELECT DemoNo, GovNo, PhotoURL "
					sql = sql & " FROM UsedCar..TBL_Car_DemoMaster_Sub "
					sql = sql & " WHERE DemoNo = '"&mresDemoNo&"' and GovNo = '"&mresGovNo&"' "

					Set rs1 = dbcon.execute(sql)

					If rs1.eof And rs1.bof Then 
						rsPhotoURL = ""
						BizInfoPhotoPath = ""
					Else
						rsPhotoURL = rs1("PhotoURL")
						If rsPhotoURL <> "" Then 
							photoUrl = Split(rsPhotoURL,",")
							BizInfoPhotoPath = Replace(photoUrl(0),".jpg","_th.jpg")
						Else 
							BizInfoPhotoPath = ""
						End If 
					End If 
					rs1.close
				Else 
					BizInfoPhotoPath = ""
				End If 

				sql = ""
				sql = sql & " select * from usedcar..tbl_certusedcar where oldcarno = '"&mresOldCarNo&"' "

				Set rsphoto = dbcon.execute(sql)

				If rsphoto.eof And rsphoto.bof Then 
					strCarPhotoCmd = "cmd=thumb&w=100&h=65"
				Else
					strCarPhotoCmd = "cmd=mythumcmd&mywidth=100&myheight=65"
				End If
				rsphoto.close
%>
						<tr >
							<td>
								<a href="/search/car-detail.asp?wDemoNo=<%=mresDemoNo%>">
									<% if BizInfoPhotoPath <> "" Then %>
										<img src="<%=BizInfoPhotoPath%>" onerror="this.src='/images/sub/noimg-small.gif'" width="100" height="65" border="0">
									<% Else %>
									<img src="<%=gPhotoPath%>/middle/<%=mresStrDemoDay%>/<%=mresDemoNo%>K01.jpg?<%=strCarPhotoCmd%>" onerror="this.src='/images/sub/noimg-small.gif'" width="100" height="65" border="0">
									<% End  If %>
								</a>
							</td>
							<td class="search-tit">
								<a href="/search/car-detail.asp?wDemoNo=<%=mresDemoNo%>">
								<span>[<%=mresMaker%>] <%=mresCarName%>&nbsp;<%=mresModelName%>&nbsp;<%=mresGradeName%></span>
								<p class="add"><%=CutString(mresLineDemo,"..",54)%></p></a>
							</td>
							<td><%=mresAutoGbn%></td>
							<td><%=mresYYMM%></td>
							<td><%=mresGaS%></td>
							<td class="blue"><%=mresKm%></td>
							<td class="red"><%=wDemoAmt%></td>
							<td class="list-right"><%=mresEmpName%><br><%=mresEmpHand%></td>
						</tr>
<%
				mres.MoveNext
				rowCnt = rowCnt - 1
				i = i + 1
			Loop
		End If

		mres.Close
		Set mres = Nothing
%>


					</tbody>
					</table>

				<div class="search-paging">
					<% Call PageList(wCurPage, intPageCnt, intPageView, "/search/search_cert.asp", wPageStr) %>
				</div>




					
				</div>

				</div>
					

				</div>
		
				
			</div>
		</div>

		<!--#include virtual="/inc/footer.asp"--> 
	</div>
 </body>
 </html>