vbºÍaccessµÄÎÊÌâ
ÈçºÎÓÃvb½â¾öÒÔÏÂÎÊÌ⣺
1¡¢ÈçºÎÓÃvb½¨Á¢Ò»¸ömdbÊý¾Ý¿âÎļþ(3·Ö£©
2¡¢ÔÚ½¨Á¢ºÃµÄÊý¾Ý¿âÖÐÓôúÂ뽨Á¢Êý¾Ý¿â¶ÔÏ󣨱í¸ñ£¬ÊÓͼ£©
3¡¢ÈçºÎÓÃvb´úÂëΪaccessÊý¾Ý¿âÌí¼ÓÓû§ºÍ×é(5·Ö£©
4¡¢ÈçºÎÓÃvb´úÂëÉèÖÃÓû§Óë×éµÄȨÏÞ£¨5·Ö£©
1 ºÍ 2 »¹ºÃ˵£¬
3 ºÍ 4 access Ö§³Öô£¿
ºÃÏñÕ⼸¸ö¶¼¿ÉÓÃadox¸ã¶¨,ÔÚÂÛ̳ÖÐËÑË÷һϰÉ
Library ADOX
C:\Program Files\Common Files\System\ado\msadox.dll
Microsoft ADO Ext. 2.8 for DDL and Security
http://so.csdn.net/bbsSearchResult.aspx?q=adox&category=all&uname=&rname=&d1=2008-01-01&d2=2010-03-09&field=all
VB code:
'---------------------------------------------------------------------------------------
' ¹ý³ÌÃû : CreateMdb
' ʱ¼ä : 2010-3-9 22:22
' ×÷Õß : Ñî¹ý.Íøºü.cn
' ¹¦ÄÜ :
' ˵Ã÷ :
'---------------------------------------------------------------------------------------
'
Public Sub CreateMdb()
On Error GoTo CreateMdb_Error
'´´½¨mdb
Dim cat As New ADOX.Catalog, strMdbFile As String
strMdbFile = App.Path & "\test.mdb"
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strMdbFile
On Error GoTo 0
Exit Sub
CreateMdb_Error:
MsgBox "´íÎó " & Err.Number & " (" & Err.D
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
rt£¬ÎÒÊÔÁËÍøÉÏÖ±Á¬AccesÊý¾Ý¿âµÄ·½·¨,windowsÏÂûÓÐÎÊÌâ,µ«ÊÇÔÚlinuxϲ»ÐУ¬ËÄܸøµãÌáʾ£¿Ð»Ð»
ÄãÔõôÁ¬µÄ£¿
AccesÊý¾Ý¿â..
ÄãÔõôÁ·µÄÄØ£¿
Java code:
static String DBDRIVER = "sun.jd ......
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ
ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......