JeanineScott
Programmer
I cannot figure how to set a SQL pass through query built on the fly to a dsn less connection string using nt authentication. The error I am getting is "The connection string is too long" Unfortunatly, I MUST have this completed by Monday so any responses/help will be greatly appreciated!!
I have pasted my code below.
NOTE: gOcon is a global set in an external function and is an active connection string at the time this process uses it. It's the same connection string I use for all my ADO recordsets.
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Data Source=xxx;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=JEANINESCOTT;Use Encryption for Data=False;Tag with column collation when possible=False
Dim qdf As DAO.QueryDef
Set qdf = gdb.QueryDefs("qryfrmSelectInstall_lstAdvancesRowSource"
With qdf
.Connect = gOcon
.SQL = SearchRS
End With
gdb.QueryDefs.Refresh
Me.lstAdvances.RowSource = "qryTemp"
Set qdf = Nothing
I have pasted my code below.
NOTE: gOcon is a global set in an external function and is an active connection string at the time this process uses it. It's the same connection string I use for all my ADO recordsets.
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Data Source=xxx;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=JEANINESCOTT;Use Encryption for Data=False;Tag with column collation when possible=False
Dim qdf As DAO.QueryDef
Set qdf = gdb.QueryDefs("qryfrmSelectInstall_lstAdvancesRowSource"
With qdf
.Connect = gOcon
.SQL = SearchRS
End With
gdb.QueryDefs.Refresh
Me.lstAdvances.RowSource = "qryTemp"
Set qdf = Nothing