Программа командной строки (консоли) VB.Net с параметрами для SharePoint

Question

Я хотел бы создать консольную программу на VB.net, которая позволила бы параметры. Что я хотел бы сделать, так это добавить в код ниже параметры, чтобы страница веб-части могла быть создана из меню «Выполнить». например C: ....... \ MyProgram.exe "Дизайн" - после этого будет создана страница веб-части "Дизайн".

Я пытался смотреть в интернет, но не очень успешно. любая помощь будет принята с благодарностью.

      Module Main

                Public Sub Main(ByVal args As String())
          Dim prj As String

                    Dim site As New SPSite("http://site/")
                    Dim web As SPWeb = site.AllWebs(0)

                    Dim list As SPList = web.Lists("ListName")

Dim postInformation As String = "<?xml version=""1.0"" encoding=""UTF-8""?><Method><SetList Scope=""Request"">" + list.ID.ToString + "</SetList><SetVar 
    Name=""ID"">New</SetVar><SetVar Name=""Cmd"">NewWebPage</SetVar><SetVar 
    Name=""Type"">WebPartPage</SetVar><SetVar Name=""WebPartPageTemplate"">2</SetVar><SetVar 
    Name=""Title"">" + prj.ToString + "</SetVar><SetVar 
    Name=""Overwrite"">true</SetVar></Method>"

                    Dim processBatch As String = web.ProcessBatchData(postInformation)
                 'Display the results...
                Console.WriteLine(processBatch)
                    Console.WriteLine("New Web part page added successfully")
                    Console.ReadLine()



                End Sub

        End Module

Заранее спасибо!

Answer 1

 Public Sub Main(ByVal sArgs() As String)

    If sArgs.Length = 0 Then                'If there are no arguments
        Console.WriteLine("Hello World! <-no arguments passed->") 'Just output Hello World
    Else                                    'We have some arguments 
        Dim i As Integer = 0

        While i < sArgs.Length             'So with each argument
            Console.WriteLine("Hello " & sArgs(i) & "!") 'Print out each item
            i = i + 1                       'Increment to the next argument
        End While

    End If

End Sub

Надеюсь, это поможет при доступе к аргументам командной строки.

Отличный ответ: Раджеш Ситараман