Tilføje brugernavn i jmail script
Hejsa Eksperterkan det lade sig gøre at hente brugernavnet frem med de oplysninger jeg har her så det skriver brugernavnet i jmail scriptet efter
JMail.Body = "Hej" & vbCrLf & vbCrLf
Koden:
if Request("CC_OrderInsert") <> "" then
'Bindingvalues=(",antal,vare,,")
UniqueIdValue=Session("MM_Username")
UniqueIdColumn="brugernavn"
CC_RedirectURL="tak.asp"
sub SaveToDatabase(ODRecordset)
ODRecordset.AddNew
ODRecordset.Fields(UniqueIdColumn)=UniqueIdValue
ODRecordset.Fields("antal")=CCcart(CC_Quantity,i)
ODRecordset.Fields("vare")=CCcart(CC_Name,i)
ordrer.Update
end sub
for i=0 to ubound(CCcart,2)
if CCcart(CC_ProductID,i) <> "" then
Call SaveToDatabase(ordrer)
bodyStr = bodyStr & CCcart(CC_Quantity,i) & " stk " & CCcart(CC_Name,i) & vbCrLf
end if
next
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "min.server.dk"
JMail.Sender = "min@email.dk"
JMail.Subject = "Din ordre"
JMail.AddRecipient "min@email.dk"
JMail.Body = "Hej" & vbCrLf & vbCrLf
JMail.Body = JMail.Body & "Du har bestil følgene vare" & vbCrLf
JMail.Body = JMail.Body & bodyStr
JMail.Body = JMail.Body & vbCrLf
JMail.Body = JMail.Body & "Tak for din bestilling." & vbCrLf & vbCrLf
JMail.Body = JMail.Body & "Hilsen shoppen"
JMail.Execute
Set Jmail = Nothing
