Thanks Ashish. It helped
Sent from my iPhone
On May 9, 2011, at 2:53 AM, ashish koul wrote:
> see if it helps
>
> CODE:
> With ActiveSheet.QueryTables.Add(Connection:=Array(Array( _
>
> "ODBC;DSN=PP;UID=ris;PWD=ri;DBQ=PP;DBA=W;APA=T;EXC=F;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;GDE=F;FR
see if it helps
CODE:
With ActiveSheet.QueryTables.Add(Connection:=Array(Array( _
"ODBC;DSN=PP;UID=ris;PWD=ri;DBQ=PP;DBA=W;APA=T;EXC=F;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;GDE=F;FRL=F;BAM=IfAllSuccessful;MTS=F;MDI=F"
_
), Array(";CSR=F;FWC=F;PFC=10;TLO=0;")), Destination:=Range("A1"))
