<% if Session("Username")<>"winthorpe" then dtTemp=Date dtYear=Year(dtTemp) dtMonth=Month(dtTemp) dtDay=Day(dtTemp) RunHitSelect "SELECT * FROM Hits WHERE TodayDay=" & dtDay & " AND TodayMonth=" & dtMonth & " AND TodayYear=" & dtYear, HitCountRS RecordFound=false do while HitCountRS.eof=false RecordFound=true Hits=HitCountRS.Fields("Links").value Hits=Hits+1 HitExecuteIt "UPDATE Hits SET Links=" & Hits & " WHERE TodayDay=" & dtDay & " AND TodayMonth=" & dtMonth & " AND TodayYear=" & dtYear HitCountRS.MoveNext loop if RecordFound=false then HitExecuteIt "INSERT INTO Hits (Links, TodayDay, TodayMonth, TodayYear) VALUES (1, " & dtDay & "," & dtMonth & "," & dtYear & ")" end if end if sub RunHitSelect(sql, byref TableRS) set Conn = Server.CreateObject("ADODB.Connection") Dim DSNvar DSNvar = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("DatabaseDB78/PDHits.mdb") & ";" Conn.Open(DSNvar) set TableRS = Conn.Execute(sql) end sub sub HitExecuteIt(sql) set Conn = Server.CreateObject("ADODB.Connection") Dim DSNvar DSNvar = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("DatabaseDB78/PDHits.mdb") & ";" Conn.Open(DSNvar) Conn.Execute(sql) Conn.Close end sub %> Perfect Day: The Deluxe Wedding Planning Software Suite...Links
wedding softwarewedding plannerwedding planning softwarewedding planner softwarewedding invitation softwarewedding budgetwedding invitationswedding organizerwedding planningwedding site
Wedding Planning Banner
Home
Wedding Planning Features
See our wedding software in action
purchase our award winning wedding planning software
questions about our wedding planning software
Find local wedding suppliers online
Wedding planning articles and features
Contact us
Wedding planning links
Advertise your wedding business in our online wedding suppliers directory
   
   
Our partners' websites are listed below. Please give them a quick visit.


Categories


Photos & Videos
AMB Productions Lancashire - Excellent wedding videos / DVDs
AMB Productions professional videography at affordable prices. Based in Lancashire. Weddings a speciality. DVD, VHS, digital editing.
Courtenay Photographic
Dorset based photographer, specialising in wedding and pregnancy photography in a relaxed, contemporary style. Pregnancy, family and wedding photography in dorset, wiltshire, somerset, cornwall and all uk.
CT Wedding Photographer,Connecticut Wedding Photographer, Troy Photography
CT wedding photographer Troy Photography - capture all your wedding moments with a mix of canid, creative and traditional photography.
David Lee Arts | Photography - San Francisco Bay Area Wedding, Portrait, Fine Art Photographer
David Lee Arts Photography. San Francisco Bay Area Wedding Photography. Portrait, Fine Art, Landscape, Nature Photographer.
Michael marker Wedding Photography
Simply stunning contemporary wedding photography. Bespoke photography service by Devon based photographers covering the South West, UK and international destinations.
Slideshow DVD Photo Service
DVD Photo Slideshow Professional
Tippleston Photography in Milton Keynes & Northampton. International Wedding Photography. Aerial Photography. PR Photography. Wedding Photography abroad. Professional qualified Wedding Photographers.
Tippleston photography, Wedding photography, aerial and PR Photography, in the UK and abroad. Professional qualified Wedding Photographers.
Video to dvd transfer - Your Memories Remembered
We transfer your home and business videotapes to dvd. Video editing also available, as well as DVD photoshows with music. Excellent references.
Wedding Photography by Ashmore Photography
Quality wedding photography & video filming. London Kent and the South East of England.
Welcome to Flickr - Photo Sharing
Flickr is almost certainly the best online photo management and sharing application in the world. Show off your favorite photos and videos to the world, securely and privately show content to your friends and family, or blog the photos and videos you

Search the Directory: 

Back | Add Link