SIEBEL: File Names from specific Folder in VBScript


Function Service_PreInvokeMethod (MethodName As String, Inputs As PropertySet, Outputs As PropertySet) As Integer

If MethodName = “FileName” Then

Dim MyFile, MyPath, MyName As String
MyPath = “c:\Test\” ‘ Set the path.
MyName = Dir(MyPath)

Do While MyName <> “” ‘ Start the loop.
If (GetAttr(MyPath & MyName)) Then
MyFile = MyName + “|” + MyFile ‘Concatnating FileName with | seperator
End If
MyName = Dir() ‘ Get next entry.
Loop
End If
Outputs.SetProperty “FileName”,MyFile
Service_PreInvokeMethod = CancelOperation
End Function

Advertisements


Categories: Siebel

Tags: , , , , , , , , , , , , , , , , , , , , , ,

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

w

Connecting to %s

%d bloggers like this: