ÔÚÏß:ÈçºÎ½«DataTableÖеÄÊý¾ÝдÈëµ½AccessÊý¾Ý¿âÖÐ!
Dim datatable As New DataTable ½¨Á¢µÄÒ»¸öÄÚ´æ±í¡£
ÈçºÎ°Ñdatatable ±íÖеÄÊý¾Ý£¬±£´æµ½ACCESSÊý¾Ý¿â¡£×îºÃÓÐÀý×ÓºÍÔ´Âë
ÓÃoledbµÄÊý¾Ý¿âÁ¬½Ó¶ÔÏóºÍÊý¾ÝÊÊÅäÆ÷µÈ¶ÔÏó£¬Àý
string cnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " + "c:\\data.mdb";
OleDbConnection cn = new OleDbConnection(cnStr);
OleDbDataAdapter da = new OleDbDataAdapter("select * from ÄãµÄ±íÃû",cn);
//data.mdbÖеıí½á¹¹ºÍÄãµÄdatatableÏàͬ;
OleDbCommandBuilder cmb = new OleDbCommandBuilder(da);
da.Update(ÄãµÄ±í);
http://topic.csdn.net/u/20090915/10/e93241bb-4aa0-4184-bdcd-6a589936a27f.html
http://topic.csdn.net/u/20090910/16/177fdb55-1cac-4765-b192-9f4f29762287.html
·ÖÊý²»¶à ´ó¼Ò¿ÉÒÔÈ¥ÕâÁ½¸öÌùÀï·¢Ìû À´×ÅÓзÝÁË Ð»Ð»ÁËÄãÃÇ£¡£¡
up£¡
Ïà¹ØÎÊ´ð£º
IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)
'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
S ......
ÎÒµÄÊý¾Ý¿âÊǼòÌåsqlserver2000 ,ÎÒÏëÔÚ·±ÌåaccessÏÂÁ¬½Ó,ͨ¹ýodbcÊÇ¿ÉÒÔÁË,µ«ÔÚaccessϳöÏÖ´ò¿ªµÄ±íÈ«ÖÐ"#ÒÑɾ³ý"
²»ÖªµÀÒªÔõô²Ù×÷²Å¿ÉÒÔÓÃACCESS·±ÌåÁ¬½Ó¼òÌåsqlserver2000.лл!!!
´ó¼Ò¶¼ ......
//**********************************
//³ÌÐò¹¦ÄÜ£º´´½¨AccessÊý¾Ý¿âºÍÊý¾Ý±í
//**********************************
unit Unit1;
interface
uses
Windows, Messages, SysUtils, ......
SQL code:
select count(1) from HouseList a left join MemberList b on
(a.OperationName=b.UName and a.Eid=1 and a.houselc='2')
ÒÔÉÏÕâÌõÓï¾äÔÚsql2005ÖвéѯµÃµ½760Ìõ¼Ç¼,·ÅÔÚaccessÖвéѯֻÓÐ14Ì ......
dim conn
dim connstr
dim db
dim dbpaswd (Õâ¸öÃÜÂë¼ÓÔÚÄÄ)
db=dbpath&"/"&dbname
connstr="DBQ="+server.mappath(""&db&"")+" ......