MagicCell - Thumbnail Images

911 Carrera Targa Porsche
Aurora Oldsmobile
Taurus SHO Ford
Avenger Dodge
Hummer AM General

bottom next goreload

[1 - 5 : 225]

Magic - Thumbnail
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
  Dim MF As New Tornado.z
  With MF
    .dbQP = "U=1|S=1|D=car2000.mdb| Th=Title=MagicCell - Thumbnail Images"
    .dbSQL = "Select car, manufacturer, picture from carspecs "
    .dbGridMagicCell = "(;![]#|~/+{})field=picture| Macro=#picture:_tn=I=/tornado/db/images-car/~T=width=128~W=200, 200~ N=_nocar.gif#"
  End With
End Sub
After you execute this example, is it what you expected like the filename is converted to an <IMG...SRC=Fielanme>? Not quite , isn't it?

The filename is converted to an <A HREF..><IMG...SRC...> as a thumbnail which is linked to the original image to a popup window sized to the image. On top of that, if the image file does not exist, then a pre-arranged 'NoShow' file called nocar.gif will display instead of a broken image icon. Is that a pretty common arrangement of an image database? If you take out the shell and query code, there is actually a single property (dbMagicCell) to generate the entire thumbnail application and thumbnail is only one of numerous options of 'MagicCell'.

At this point of the demo, can you image that you can spend your time in designing the business rules instead of learning how to program the Web.

Send comments on this topic.
Copyright (c) 1998-2006 ASP-db