Impromptu Log On Info. Prompt the user

[JerryKlmns]

I 'm trying to automate an Impromptu (ver 7.3) imr to be saved as a ASCII file, through VB6. But I would like the user to input their log on UserClassID & UserClassPassword at the form that impromptu uses. Not using a form of mine! Like prompting for a connection.

The rest is ready

Sub ExportMissingCIDs()
On Error GoTo Err_Impromptu

Dim objImpromptu As Object
Dim objReport As Object
Dim TheServer As String
Const TheCatalog As String = "xxx"
Const TheReport As String = "xxx"
Const TheExportFile As String = "xxx"
Set objImpromptu = CreateObject("CognosImpromptu.Application")
objImpromptu.Visible -1
[green]'objImpromptu.OpenCatalog TheServer & TheCatalog, TheUserClassID, TheUserClassPassword, TheDatabaseID, TheDatabasePassword, True [/green][b]<-- I dont want to do it this way. I want to show the logon screen[/b]
Set objReport = objImpromptu.OpenReport(TheReport, myTotalList)
objReport.RetrieveAll
objReport.ExportASCII "L:\CallCenter\Data\NewCIDs.txt" ', "x_ascii.flt"
objReport.CloseReport
objImpromptu.Quit

Exit_Impromptu:
  Set objReport = Nothing
  Set objImpromptu = Nothing
  Exit Sub

Err_Impromptu:
  MsgBox Err.Number & ": " & Err.Description
  Resume Exit_Impromptu

End Sub

Also, is there a nice lib that would give me the nice Intellisense for early binding help?

 

[JerryKlmns]

For the last part, here is the answer thread707-1282649

 

[drlex]

Jerry
Would an acceptable way of doing this be the use of Dialog boxes in the macro to take user credentials? (I appreciate that this will not validate, but one could call the Authenticator application to check the input is valid against the namespace).

soi la, soi carré

 

[drlex]

Oh, and as an afterthought, Authenticator has a type library file "AccessAdmAuto.tlb" in the same location as "Impclient.tlb".
lex

soi la, soi carré

 

[JerryKlmns]

drlex

An exact copy (looking the same) form is also a work around now you say that, but if it was there I could save time.

Thanx for the thought and the tip!