Styjun

Someone who is granted access to information but not expected to read it

When is the phrase "j'ai bon" used?

How can religions without a hell discourage evil-doing?

How do I become a better writer when I hate reading?

Having some issue with notation in a Hilbert space

Can a 40amp breaker be used safely and without issue with a 40amp device on 6AWG wire?

Why not make one big CPU core?

What made the Ancient One do this in Endgame?

Is there a term for someone whose preferred policies are a mix of Left and Right?

Can I appeal credit ding if ex-wife is responsible for paying mortgage?

What should I be aware of in buying second-hand sinks and toilets?

Can artificial satellite positions affect tides?

How to test soql with For Update statement

Was the Lonely Mountain, where Smaug lived, a volcano?

How can I detect if I'm in a subshell?

What is the context for Napoleon's quote "[the Austrians] did not know the value of five minutes"?

Will users know a CardView is clickable

How could I create a situation in which a PC has to make a saving throw or be forced to pet a dog?

Why did the USA sell so many airplanes prior to WW2?

Can I give my friend the sour dough "throw away" as a starter to their sourdough starter?

SQL Server has encountered occurences of I/O requests taking longer than 15 seconds

Is it unethical to quit my job during company crisis?

Using roof rails to set up hammock

Does an African-American baby born in Youngstown, Ohio have a higher infant mortality rate than a baby born in Iran?

ADODB query become weird characters with Vietnamese characters

VBA ADODB Query Mysql returns character corruptionADODB query timeoutVBA ADODB Query Mysql returns character corruptionRunning successive DB queries with ADODB in vbaVBA ADODB Connection -SQL QUERYWhy would a macro from a different workbook be inaccesible after allowing macro's?Query range in activeworkbook using ADODBODBC Driver has become erratic when making connection and processing SQL queryvba adodb parameter query failsADODB sometimes does not record dataADODB query does not retrieve dates

.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty height:90px;width:728px;box-sizing:border-box;

-1

I have the code and sample file from an other page about using excel as database in VBA. and i have the same problem with the topic blow:
VBA ADODB Query Mysql returns character corruption
but my code have:

cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name

Is there any way to fix this?

Here is detail about the code( sorry if it's too long to read):
http://chandoo.org/wp/2012/04/02/using-excel-as-your-database/

When I use Vietnamese charaters in sheet "data" and running SQL, Vietnamese charaters are all displayed as ???

Hope to receive some guide to fix it.

Sorry, here is the main code
For more such as the working code, data, and how it works,... please download full file from link of chandoo above, because i don't know how to attach file here:

 Option Explicit
 Public cnn As New ADODB.Connection
 Public rs As New ADODB.Recordset
 Public strSQL As String

 Public Sub OpenDB()
 If cnn.State = adStateOpen Then cnn.Close
 cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
 ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
 cnn.Open
 End Sub

 Public Sub closeRS()
 If rs.State = adStateOpen Then rs.Close
 rs.CursorLocation = adUseClient
 End Sub

database vba adodb

share|improve this question

edited Mar 25 at 2:30

Cœur

20.5k10119162

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  please share your codes
  
  – Ivan Barayev
  May 14 '16 at 15:43
  

  
  
  
  

add a comment | 

-1

I have the code and sample file from an other page about using excel as database in VBA. and i have the same problem with the topic blow:
VBA ADODB Query Mysql returns character corruption
but my code have:

cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name

Is there any way to fix this?

Here is detail about the code( sorry if it's too long to read):
http://chandoo.org/wp/2012/04/02/using-excel-as-your-database/

When I use Vietnamese charaters in sheet "data" and running SQL, Vietnamese charaters are all displayed as ???

Hope to receive some guide to fix it.

Sorry, here is the main code
For more such as the working code, data, and how it works,... please download full file from link of chandoo above, because i don't know how to attach file here:

 Option Explicit
 Public cnn As New ADODB.Connection
 Public rs As New ADODB.Recordset
 Public strSQL As String

 Public Sub OpenDB()
 If cnn.State = adStateOpen Then cnn.Close
 cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
 ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
 cnn.Open
 End Sub

 Public Sub closeRS()
 If rs.State = adStateOpen Then rs.Close
 rs.CursorLocation = adUseClient
 End Sub

database vba adodb

share|improve this question

edited Mar 25 at 2:30

Cœur

20.5k10119162

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  please share your codes
  
  – Ivan Barayev
  May 14 '16 at 15:43
  

  
  
  
  

add a comment | 

I have the code and sample file from an other page about using excel as database in VBA. and i have the same problem with the topic blow:
VBA ADODB Query Mysql returns character corruption
but my code have:

cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name

Is there any way to fix this?

Here is detail about the code( sorry if it's too long to read):
http://chandoo.org/wp/2012/04/02/using-excel-as-your-database/

When I use Vietnamese charaters in sheet "data" and running SQL, Vietnamese charaters are all displayed as ???

Hope to receive some guide to fix it.

Sorry, here is the main code
For more such as the working code, data, and how it works,... please download full file from link of chandoo above, because i don't know how to attach file here:

 Option Explicit
 Public cnn As New ADODB.Connection
 Public rs As New ADODB.Recordset
 Public strSQL As String

 Public Sub OpenDB()
 If cnn.State = adStateOpen Then cnn.Close
 cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
 ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
 cnn.Open
 End Sub

 Public Sub closeRS()
 If rs.State = adStateOpen Then rs.Close
 rs.CursorLocation = adUseClient
 End Sub

database vba adodb

share|improve this question

edited Mar 25 at 2:30

Cœur

20.5k10119162

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name

 Option Explicit
 Public cnn As New ADODB.Connection
 Public rs As New ADODB.Recordset
 Public strSQL As String

 Public Sub OpenDB()
 If cnn.State = adStateOpen Then cnn.Close
 cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
 ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
 cnn.Open
 End Sub

 Public Sub closeRS()
 If rs.State = adStateOpen Then rs.Close
 rs.CursorLocation = adUseClient
 End Sub

share|improve this question

edited Mar 25 at 2:30

Cœur

20.5k10119162

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

share|improve this question

edited Mar 25 at 2:30

Cœur

20.5k10119162

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

edited Mar 25 at 2:30

Cœur

20.5k10119162

edited Mar 25 at 2:30

Cœur

20.5k10119162

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

asked May 14 '16 at 15:41

ngọc nguyễn hữungọc nguyễn hữu

11

1 Answer
1

active

oldest

votes

0

I have found the answer
its is recomended that OLE DB should be used instead ODBC. OLE DB suport unicode charater. I had tried and it worked well.
cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
should be replace by connectionstring blow
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:myFoldermyExcel2007file.xlsx;
Extended Properties="Excel 12.0 Xml;HDR=YES";

thank you for your concern

share|improve this answer

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11

add a comment | 

Your Answer

StackExchange.ifUsing("editor", function ()
StackExchange.using("externalEditor", function ()
StackExchange.using("snippets", function ()
StackExchange.snippets.init();
);
);
, "code-snippets");

StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "1"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f37228643%2fadodb-query-become-weird-characters-with-vietnamese-characters%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

0

I have found the answer
its is recomended that OLE DB should be used instead ODBC. OLE DB suport unicode charater. I had tried and it worked well.
cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
should be replace by connectionstring blow
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:myFoldermyExcel2007file.xlsx;
Extended Properties="Excel 12.0 Xml;HDR=YES";

thank you for your concern

share|improve this answer

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11

add a comment | 

0

I have found the answer
its is recomended that OLE DB should be used instead ODBC. OLE DB suport unicode charater. I had tried and it worked well.
cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
should be replace by connectionstring blow
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:myFoldermyExcel2007file.xlsx;
Extended Properties="Excel 12.0 Xml;HDR=YES";

thank you for your concern

share|improve this answer

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11

add a comment | 

I have found the answer
its is recomended that OLE DB should be used instead ODBC. OLE DB suport unicode charater. I had tried and it worked well.
cnn.ConnectionString = "Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb);DBQ=" & _
ActiveWorkbook.Path & Application.PathSeparator & ActiveWorkbook.Name
should be replace by connectionstring blow
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:myFoldermyExcel2007file.xlsx;
Extended Properties="Excel 12.0 Xml;HDR=YES";

thank you for your concern

share|improve this answer

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11

share|improve this answer

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11

answered May 25 '16 at 13:20

ngọc nguyễn hữungọc nguyễn hữu

11