ASP connection string problem??

hello to all respected experts,

                                      I m new in asp ,i retrive parametres through flash files in this user fill the feedback and i get the feedback mail,now i want to save the user information in SQL SERVER 2008 database which user fill in the feedback form...i got the error in the connection string??? so please help here is my code:

error is:

Microsoft OLE DB Provider for SQL Server error '80040e4d'

Login failed for user 'CDFEED'.

/cmpp.asp, line 68

<%
Response.Write("oookkkk")
Category = Request.Form("verrole")
Name = Request.Form("vername")
StudentName = Request.Form("verstuname")
School = Request.Form("verschool")
Klass = Request.Form("verclass")
Book = Request.Form("verbook")
Email = Request.Form("vermail")
Mobile = Request.Form("vermobile")
Place = Request.Form("verplace")
State = Request.Form("verstate")
Country = Request.Form("vercountry")
View = Request.Form("verview")

Set Mail = CreateObject("CDO.Message")

'This section provides the configuration information for the remote SMTP server.

'Send the message using the network (SMTP over the network).
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 

Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="localhost"
Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

Mail.Configuration.Fields.Update

'End of remote SMTP server configuration section

Mail.Subject="CD Feedback"
Mail.From="cduser@eevergreen.in"
Mail.To="Rajnish@eevergreen.in"
Mail.Bcc="Nitinkaundal@yahoo.com"

msg =  "Category       :   " + Category & vbCrLf 
msg = msg+  "Name       :   " + Name & vbCrLf 
msg = msg+  "Student Name   :   " + StudentName & vbCrLf 
msg = msg + "School      :   " + School & vbCrLf
msg = msg + "Class        :   " + Klass & vbCrLf
msg = msg + "Subject     :   " + Book & vbCrLf
msg = msg + "E-mail      :   " + Email & vbCrLf	
msg = msg + "Mobile      :   " + Mobile & vbCrLf
msg = msg + "From        :   " + Place & vbCrLf
msg = msg + "State      :   " + State  & vbCrLf
msg = msg + "Country     :   " + Country & vbCrLf
msg = msg + "Feedback :   " + View & vbCrLf


Mail.TextBody =  msg


dim connection
dim sSQL, sConnString

'declare SQL statement that will query the database
sSQL="INSERT INTO cd_feedback (CATEGORY, NAME,STUDENTNAME,CLASS,SCHOOL,SUBJECT,EMAIL,MOBILE,PLACE,STATE,COUNTRY,FEEDBACK) VALUES ('cat', 'nam','Stname','class','school','sub','Email','mobile','place','state','country','feedback')"


sConnString= "Provider=SQLOLEDB; Data Source=SERVER IP; Initial Catalog=eEvergreen; User Id=CDFEED;Password=feed@123;"




Set connection = Server.CreateObject("ADODB.Connection")



connection.Open(sConnString)


connection.execute(sSQL)


Connection.Close



Mail.Send
Set Mail = Nothing
%>