Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 152
  • Last Modified:

Problem to run against Sql server DB

Hi,
I actually want to connect to Sql server DB, from Excel VBA codes, using these

    strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=CBRHKMA;Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"
    ...
            s = "delete from [ODBC;Description=TEST;DRIVER=SQL Server;" _
            & "SERVER=PC336_W7_HKMA;Trusted_Connection=Yes;" _
            & "DATABASE=CBRHKMA].T41 " _
            & "where [Reporting Date]=convert(datetime,'" & Mid(strLine, pos0, 8) & "',112)"
            ...

Open in new window

but I get the error attached. why?
t917.png
0
HuaMinChen
Asked:
HuaMinChen
  • 4
  • 3
  • 2
  • +1
2 Solutions
 
QlemoBatchelor, Developer and EE Topic AdvisorCommented:
When using Jet drivers you need to provide aa valid file as source. You should use a direct ODBC connection without that Jet stuff.
0
 
HuaMinChenBusiness AnalystAuthor Commented:
Thanks. what to adjust in above?
0
 
HuaMinChenBusiness AnalystAuthor Commented:
Can you please show with more details? thanks.
0
Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
Phillip BurtonDirector, Practice Manager and Computing ConsultantCommented:
The reason you are getting this error is because of

Data Source=CBRHKMA

Because you haven't got a folder path, it is interpreting this as CBRHKMA.xls in the current directory.

For more information around connecting to SQL Server from Excel, see http://www.experts-exchange.com/Software/Office_Productivity/Office_Suites/MS_Office/Excel/Q_28509282.html

If you want some straight-forward code, go to http://www.excel-sql-server.com/excel-sql-server-import-export-using-vba.htm and "Show source code" of "SQL Server Data Import to Excel using ADO".
0
 
Pratima PharandeCommented:
ResolutionTo work around this issue, carefully verify not only the name and spelling of the source table (or tables) named in your query, but the name and spelling of the Excel path and file name supplied in your ADO connection string.

refer

http://support.microsoft.com/kb/316809/en-us
0
 
HuaMinChenBusiness AnalystAuthor Commented:
Many thanks all. Can I know exactly what I should adjust, to my codes in above?
0
 
Phillip BurtonDirector, Practice Manager and Computing ConsultantCommented:
We don't know your exact connection requirements and strings, so no.
0
 
Phillip BurtonDirector, Practice Manager and Computing ConsultantCommented:
0
 
HuaMinChenBusiness AnalystAuthor Commented:
Thanks all.
will it be fine, if I have the codes like

    Dim cn As ADODB.Connection
    Set cn = CreateObject("ADODB.Connection")
    
    'strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=CBRHKMA;Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"
    strCon = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=True;Data Source=PC336_W7_HKMA;" & _
                              "InitialCatalog=CBRHKMA;"
    
    cn.Open strCon
    ...
            s = "delete from T41 " _
            & "where [Reporting Date]='" & date_part & "'"
            
            cn.Execute s
            ...

Open in new window


supposing that there is no syntax error above, and PC336_W7_HKMA is server name, and CBRHKMA is schema name?
0
 
QlemoBatchelor, Developer and EE Topic AdvisorCommented:
... and you are on the same domain (because of Trusted Connection / Integrated Security) - yes.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

  • 4
  • 3
  • 2
  • +1
Tackle projects and never again get stuck behind a technical roadblock.
Join Now