<% Const IMGS_DIR = "/images"
Dim objFSO, objFolderObject, objFileCollection, objFile
Dim intFileNumberToUse, intFileLooper
Dim objImageFileToUse
Dim strImageSrcText
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR))
Set objFSO = Nothing
Set objFileCollection = objFolderObject.Files
Set objFolderObject = Nothing
Randomize()
intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1
intFileLooper = 1
For Each objFile in objFileCollection
If intFileLooper = intFileNumberToUse Then
Set objImageFileToUse = objFile
Exit For
End If
intFileLooper = intFileLooper + 1
Next
Set objFileCollection = Nothing
strImageSrcText = IMGS_DIR & objImageFileToUse.Name
Set objImageFileToUse = Nothing
%>
"Amanda was extremely professional and the service she provided was faultless. She was great with the kids and worked really well with them. My baby was only 8 weeks old and he looks to be smiling in nearly every photo. She managed to capture each of their personalities in each photo and the quality was extremely high. I was definitely impressed with Studio Ni and will return for another sitting in the future."
Bonnie McCarthy
“I received the photos today and they look unreal. Thank you so much for a professional job and prompt service."
Linda Durham
Weddings
“Studio Ni captured our wedding day in a way which truly represents the love, emotion, happiness and importance shared on the day. We really enjoyed working with Amanda and are very happy with the images. They were natural, relaxed, yet brilliantly capturing the essence of every moment, and all that the venue offered. Thanks Amanda, we couldn't be happier!!!”
Liz and Dan Todd
“Loved the photos and Amanda put me completely at ease."
Nicole Arrowsmith
Commercial
“Thank you for your letter and discs, Amanda. Your patience and professionalism with us while we were buzzing around here are appreciated. Again, thank you for being easy to work with. I hope we can do business again in the future.”
