Archive

Posts Tagged ‘form script’

Obtaining Username in form script

October 24th, 2011 5 comments

In syteline 7 it was SessionManager.BaseUserName.
In Syteline 8

  • Create form component ‘UserEdit’ and bind it to variable ‘User’ with initial value ‘USERNAME()’
  • Get the value on form script by ‘ThisForm.Variables(“User”).Value’
    This will return the UserID who login to Syteline.
  • Use System.Environment.UserName to get the UserID login to Windows.

Here is a sample screen shot

ScreenHunter_04 Mar. 21 10.29

Send Email with Form Script

March 8th, 2011 No comments

Below is a pretty useful Form Script Function that can be used to send out email.  You can trigger this by any event. 

PublicSub SendEmail()
Dim EmailBody AsString
Dim toAddress AsNew Net.Mail.MailAddress(ThisForm.PrimaryIDOCollection .GetCurrentObjectProperty("your_email_field"))
Dim FromAddress AsNew Net.Mail.MailAddress("me@company.com", "Display Name")
EmailBody = "Some text:" & ThisForm.PrimaryIDOCollection.GetCurrentObjectProperty("some_property") & vbNewLine _
& "Some more stuff: " & vbNewLine & ThisForm.PrimaryIDOCollection.GetCurrentObjectProp erty("description")
Dim msg AsNew Net.Mail.MailMessage(FromAddress, toAddress)
msg.Body = EmailBody
msg.IsBodyHtml = False
msg.Subject = "Some subject:" & ThisForm.PrimaryIDOCollection.GetCurrentObjectProp erty("some_property")
Try
Dim mySmtp AsNew Net.Mail.SmtpClient("IP address of your SMPT server")
mySmtp.Send(msg)
Catch ex As Exception
MsgBox(ex.Message)
End Try
EndSub