View Single Post
  #3 (permalink)  
Old July 17th, 2015, 10:07 AM
hudsonalves hudsonalves is offline
Authorized User
Points: 42, Level: 1
Points: 42, Level: 1 Points: 42, Level: 1 Points: 42, Level: 1
Activity: 0%
Activity: 0% Activity: 0% Activity: 0%
 
Join Date: Jul 2015
Posts: 11
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Hi

To call in html use like this:

Code:
<%
Dim rsTypesGallery__MMColParam
rsTypesGallery__MMColParam = "1"
If (Request.QueryString("iUsuario") <> "") Then 
  rsTypesGallery__MMColParam = Request.QueryString("iUsuario")
End If
%>

<%
Dim rsTypesGallery
Dim rsTypesGallery_numRows
Set rsTypesGallery = Server.CreateObject("ADODB.Recordset")
rsTypesGallery.ActiveConnection = MM_conn_STRING
rsTypesGallery.Source = "SELECT TOP 20 * FROM TYPES, PICTURES WHERE TYPE_USER = '" + Replace(rsTypesGallery__MMColParam, "'", "''") + "' AND TYPE_ID = PIC_TYPE ORDER BY TYPE_DATED DESC"
rsTypesGallery.CursorType = 0
rsTypesGallery.CursorLocation = 2
rsTypesGallery.LockType = 1
rsTypesGallery.Open()
rsTypesGallery_numRows = 0
%>
	
<main role="main">
 <section>
  <div class="section-inner " style="background-color: #9899a8; ">
   <div class="container portfolio" data-id="44">
    <div class="portfolio-list">
     <ul class="row clear">
      <%
      Do while not rsTypesGallery.eof
      %>
      <li class="col col-3 mobile-full lightbox">
      <a href="typeimage.asp?iType=<%=(rsTypesGallery.Fields.Item("TYPE_ID").Value)%>">
       <img width="480" height="360" src="../images/<%= rsTypesGallery.Fields.Item("TYPE_IMAGE") %>" />
       <span class="icon retroicon-gallery"></span>
        <h3><%=(rsTypesGallery.Fields.Item("TYPE_NAME").Value)%></h3>
      </a>
      
      <span class="hidden-gallery hidden">
       <a class="mfp-image" href="../images/<%= rsTypesGallery.Fields.Item("PIC_IMAGE") %>"></a>
      </span>
      </li>	
      
      <%
	rsTypesGallery.movenext
	loop
      %>
     </ul>
    </div><!-- portfolio-list -->
   </div>
  </div>
 </section>	
</main>
<%
rsTypesGallery.close
%>

The result appears in the photo number 1:

http://www.hudsonalves.com/mercadolivreimg/photo1.jpg

In my Access database table is my album of this (photo2):

http://www.hudsonalves.com/mercadolivreimg/photo1.jpg

In my Access database my photo table is this (photo3)
http://www.hudsonalves.com/mercadolivreimg/photo3.jpg

The right way: by signing 10 photos to an album, to call in html the system show a single album and inside the 10 photos.