Private Sub GetSiteAllParams() 'The following Visual Basic example gets the properties ' of all the parameters. Dim sReply As String On Error GoTo err sReply = m_SAClient.GetSiteAllParams MsgBox sReply Exit Sub err: MsgBox "Program failed:" + err.Description End Sub