Yes we are. It turns out the issue was some syntax errors in the code. This is all set now.
Thanks Peter Lammey ESPN MIT Technical Services & Applications Management 860-766-4761 ________________________________ From: Action Request System discussion list(ARSList) [mailto:[EMAIL PROTECTED] On Behalf Of Robert Molenda Sent: Tuesday, September 25, 2007 3:39 PM To: [email protected] Subject: Re: Running into issues when using the Remedy .NET API script against ARS 7.01 / ITSM 7.02 ** Silly question, are you actually logging into the system prior to the create entry? Dim myARServer As New BMC.ARSystem.Server If ARS_Login(myARServer, txtServer.Text, txtLoginName.Text, txtPassword.Text) = False Then 'HCF - Hault Catch Fire, Login Failed! CheckARSError(myARServer) Else 'Login Succesful! Dim myFieldList_Logging As New BMC.ARSystem.FieldValueList myFieldList_Logging.Add(2, txtLoginName.Text.ToString(), BMC.ARSystem.Constants.AR_DATA_TYPE_CHAR) myFieldList_Logging.Add(7, "New", BMC.ARSystem.Constants.AR_DATA_TYPE_CHAR) myFieldList_Logging.Add(8, "People Import", BMC.ARSystem.Constants.AR_DATA_TYPE_CHAR) myFieldList_Logging.Add(... ...) Dim szRequestID As String = "" Dim szFormDef_Logging As String = "IFX:INTF:People Feed-History" Try szRequestID = myARServer.CreateEntry(szFormDef_Logging, myFieldList_Logging) Catch ex As Exception CheckARSError(myARServer) End Try End If Private Function CheckARSError(ByVal lclARS As BMC.ARSystem.Server) As Integer If lclARS.LastReturnCode <> 0 Then ' Ka boom! ' Output all messages! Dim x As Integer x = 0 While (x < lclARS.LastStatus.Count) txtStatus.Text += vbTab & lclARS.LastStatus.Item(x).MessageText txtStatus.Text += vbCrLf & vbTab & lclARS.LastStatus.Item(x).AppendedText txtStatus.Text += vbCrLf & vbTab & "ARERR: " & lclARS.LastStatus.Item(0).MessageNumber.ToString & vbCrLf x += 1 End While End If CheckARSError = lclARS.LastReturnCode End Function HTH Thanks-n-advance; HDT Platform Incident / Problem Manager & Architect Robert Molenda IT OS PA Tel: +1 408 503 2701 Fax: +1 408 503 2912 Mobile: +1 408 472 8097 [EMAIL PROTECTED] Quality begins with your actions. ________________________________ From: Action Request System discussion list(ARSList) [mailto:[EMAIL PROTECTED] On Behalf Of Lammey, Peter A. Sent: Friday, September 14, 2007 5:43 AM To: [email protected] Subject: Running into issues when using the Remedy .NET API script against ARS 7.01 / ITSM 7.02 We are in the process of developing and testing a .NET API script against our ARS 7.01 / ITSM 7.02 and some of the commands seem to work but when we run the script the command returns "Error(623) Authentication failed" error. When attempting this command: EntryId = objARSystem.CreateEntry(pRemedySchema, FieldValues) Here are all the versions of the Remedy .NET API and the programs that we are using: BMC.arnettoc.dll 7.0.0.0 BMC.ARSystem.dll 7.0.2391.24945 Visual Basic .NET 2005 Windows Server 2003 However we can successfully connect with the following string: Call objArSystemPub.Login(pRemedyServer, pRemedyUID, pRemedyPWD, "") Call objArSystemPub.SetServerPort(Microsoft.VisualBasic.Conversion.Int(pRemed yPort), Microsoft.VisualBasic.Conversion.Int(pRemedyRPCProgramNum)) Is there is any .NET API expertise out there that can help us with this? Our Remedy AR System is version 7.01 patch 002 and our ITSM version is 7.02 patch 005. Thanks Peter Lammey ESPN MIT Technical Services & Applications Management 860-766-4761 __20060125_______________________This posting was submitted with HTML in it___ __20060125_______________________This posting was submitted with HTML in it___ _______________________________________________________________________________ UNSUBSCRIBE or access ARSlist Archives at www.arslist.org ARSlist:"Where the Answers Are"
