<%@LANGUAGE="VBSCRIPT"%> <% Dim MM_editAction MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit Dim MM_abortEdit MM_abortEdit = false %> <% ' IIf implementation Function MM_IIf(condition, ifTrue, ifFalse) If condition = "" Then MM_IIf = ifFalse Else MM_IIf = ifTrue End If End Function %> <% If (CStr(Request("MM_insert")) = "form1") Then If (Not MM_abortEdit) Then ' execute the insert Dim MM_editCmd Set MM_editCmd = Server.CreateObject ("ADODB.Command") MM_editCmd.ActiveConnection = MM_lobella_conn_STRING MM_editCmd.CommandText = "INSERT INTO lobellacom.registration (firstname, lastname, country, state, city, address, postalcode, hometelephone, email, ispaid, datetime) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, 0b0, ?)" MM_editCmd.Prepared = true MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 201, 1, 200, Request.Form("txt_firstname")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 201, 1, 200, Request.Form("txt_lastname")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 201, 1, 100, Request.Form("txt_country")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 201, 1, 100, Request.Form("txt_state")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 201, 1, 100, Request.Form("txt_city")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 201, 1, 500, Request.Form("txt_address")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 201, 1, 100, Request.Form("txt_postalcode")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 201, 1, 100, Request.Form("txt_hometelephone")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 201, 1, 100, Request.Form("txt_email")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 201, 1, 100, Request.Form("txt_datetime")) ' adLongVarChar MM_editCmd.Execute MM_editCmd.ActiveConnection.Close ' append the query string to the redirect URL Dim MM_editRedirectUrl MM_editRedirectUrl = "./paynow.asp" If (Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If Response.Redirect(MM_editRedirectUrl) End If End If function mysqldate(dt) if isdate(dt) then vmonth = cstr(month(dt)) if len(vmonth) = 1 then vmonth = "0" + vmonth vday = cstr(day(dt)) if len(vday) = 1 then vday = "0" + vday mysqldate = year(dt) & "-" & vmonth & "-" & vday else mysqldate = 0 end if end function %> LoBella.com
 
 


 

 


< back


The Greatest Love by Loren Slocum
Wednesday, May 28, 2008
By Carine Nadel

The Greatest Love- Being an extraordinary mom. with pictures by Brittany Lee Hanson is more than just a beautiful coffee table book. It has all the elements of what a book on motherhood should be: dedication to the art of being a mother, self-help tips for the new parent, support for those of us who are now in a different phase and the photos that capture all of the above.

As parents, sometimes we all forget to enjoy all the amazing things we are living through because we’re too busy doing them. This book is a nice reminder that we need to slow down and take a breath.

The Greatest Love is filled with ways to teach and enjoy our kids-and how grateful we should be that they have been placed in our lives for us to watch grow and change. It also reminds us that they teach us and therefore we grow as people because of them.

Don’t get me wrong, this isn’t a how-to on what to do. No matter how many books claim to know how to create the perfect parental experience and turn out perfect children-this is unattainable. What this book does do is lead you through what Anthony Robbins (who wrote the introduction) says is “a guide to show you the blessing and adventure of motherhood”

Filled with black and white photos of babies on their own, moms with their cherished offspring all showing various views of curiosity, reflection, exploration and even just enjoying the simplest things in their existence, the book leaves you with a feeling of serenity.

Brittany Lee Hanson has spent most of her professional photographic career taking pictures of some of the world’s most prominent families, their kids and their weddings. Her works have been on magazine covers, advertising campaigns and she has won awards from her fellow professional photographers.

Loren Slocum loves being a mom-it’s evident in every essay, chosen picture and quote that she has written or chosen. So committed was she to making sure that the book “said” what she felt, that it was 10 years in the making. She is the co-founder of Project Boomerang. What I love is that she’s so committed to kids that she is donating 10% of all her book sales off her www.Lobella.com site to Women and Children’s Organizations.


http://fabulously40.com:80/article/2340/The-Greatest-Love-by-Loren-Slocum/

 

 
       
     
back to top  
 
all rights reserved l 2007 Lobella.com