|
| [VB.NET] | |
| Function GetNextFile
(FilesID As String)
As
String |
|
| FilesID |
| Files ID |
|
| Next file name or empty string if no more 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 |
