|
[VB.NET] | |
Function GetFirstFile
(FilesID As String)
As
String |
|
FilesID |
Files ID |
|
First file name or empty string if no files |
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") |
| 'Get Files Object |
| Dim objFiles As New FilesRef.Files()
|
| 'Get Files object ID |
| Dim FilesID As
String = sess.GetFiles(SessionID) |
| Dim FileName As
String |
| 'Get first filename |
| FileName=objFiles.GetFirstFile(FilesID) |
| While FileName <> "" |
| 'Print file name |
| Console.WriteLine("Found File=" & FileName) |
| FileName = objFiles.GetNextFile(FilesID) |
| End While |
| sess.Release(SessionID) |
| Catch e As Exception |
| 'Print exception message e.Message |
| sess.Release(SessionID) |
| End Try |