<%
Sub SubMain(ByRef objQuery)
Call SubContent(objQuery)
End Sub
Sub SubContent(ByRef objQuery)
%>
캔쿤스페셜
3박 4일
뉴욕시내관광
당일투어
<%
Dim arrP1, pN, tempW
arrP1 = funcGetMainImg(objQuery, "P1")
If IsArray(arrP1) Then
For pN=0 To UBound(arrP1, 2)
If pN=0 Then
tempW = "37"
ElseIf pN=1 Then
tempW = "18"
ElseIf pN=2 Then
tempW = "45"
End IF
%>
<%Next
End If
%>
<%
Dim arrP2
arrP2 = funcGetMainImg(objQuery, "P2")
If IsArray(arrP2) Then
For pN=0 To UBound(arrP2, 2)
%>
<%Next
End If
%>
<%
Dim arrP3
arrP3 = funcGetMainImg(objQuery, "L2")
If IsArray(arrP3) Then
For pN=0 To UBound(arrP3, 2)
%>
