|
| [VB.NET] | |
| Sub SendURL
(NotificationID As String, TargetUIN As String, URL As String, Description As String)
|
|
| NotificationID |
| Notification ID |
| TargetUIN |
| Target UIN number |
| URL |
| URL |
| Description |
| Description Text |
| VB.NET
Example |
Switch to language:
[C#] |
|
| | 'Create personalizer object and Session object |
| | Dim pers As New PersonalizerRef.Personalizer()
|
| | Dim sess As New SessionRef.Session()
|
| | Dim SessionID As
String = "" |
| | Try |
| | SessionID = pers.CreateSession("LogonName", "Password") |
| | 'Create ICQ notification |
| | Dim objICQ As New ICQRef.ICQ()
|
| | 'Create server notification object |
| | Dim ICQNotifID As
String |
| | ICQNotifID = sess.CreateICQNotification(SessionID) |
| | objICQ.Logon(ICQNotifID, "012345", "Password") |
| | objICQ.Send(ICQNotifID, "543210", "This is ICQ Notification Message") |
| | objICQ.SendURL(ICQNotifID, "543210", "www.acrosscommunications.com", "Take a look at my site") |
| | objICQ.Disconnect(ICQNotifID) |
| | objICQ.Release(ICQNotifID) |
| | sess.Release(SessionID) |
| | Catch e As Exception |
| | 'Print exception message e.Message |
| | sess.Release(SessionID) |
| | End Try |
