I agree with the .Net approach (we are a Windowz shop), I've ported all
"driver applications"  into this application structure.  Very nice and
well done. (have the 7X version running against 6X systems even :-) )

 

>> maybe we need to change the thread-subject, but I have used it to
export 200,000++ Records in one "export"  Sure beat doing it in user
tool!!!<<

 

Dim sz_Query As String = "'Service Center' = " + """" + "San Jose" +
""""

myARServer.ExportData("d:\temp\SCC_SHR_CAT.arx", "SHR:Categorization",
sz_Query, False, BMC.ARSystem.Server.DataExportFormat.ARX)

 

Just ensure the "Max Entries Returned by GetList" is larger than your
exported-record-set-length. I had to tweak ours = 0, export, then back
to our standard value...

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 CONDREA, Daniel
Sent: Thursday, August 23, 2007 1:30 AM
To: [email protected]
Subject: Re: Remedy automation using VBA

 

Hi All,

 

Use BMC AR System .NET and COM API  no need  for User Tool at all and it
works great. I have been trying to export data using BMC AR System .NET
and COM API but failed. My supposition is that I am trying to export
more than 10 000 recs or more.

 

Best regards,

Daniel

 

________________________________

From: Action Request System discussion list(ARSList)
[mailto:[EMAIL PROTECTED] On Behalf Of theeptii thamizharasu
Sent: Thursday, August 23, 2007 9:11 AM
To: [email protected]
Subject: Remedy automation using VBA

** 

I am working on Remedy automation using VBA. I need to know 

1. How to get all children at one go?

2. Why does Click() fail for the following snippet

 

Dim objARSession As New ARUSER.COMAppObj
Dim objARWindow As ARUSER.ICOMFormWnd2
Dim sessionID As Long
Dim strSystem, stUserName, stPassword As String
Dim ARitem As Object

 

sessionID = objARSession.Login(stUserName, stPassword, 0)
Set objARWindow = objARSession.LoadForm(sessionID, strSystem, "Home
Page", "", ARDisplay, 1)
Set ARitem = objARWindow.GetFieldById(1575) '<--- This is a button
object

MsgBox (ARitem.Value) '<-- Returns the exact label of the button

ARitem.Click() '<--- Fails here :(

 

 

Please help.

 

Thanks

 

 

 

________________________________

size=1 width="100%" align=center> 

Try the revolutionary next-gen Yahoo! Mail. Click here.
<http://in.rd.yahoo.com/tagline_mail_10/*http:/mrd.mail.yahoo.com/dc/lan
ding>  __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"

Reply via email to