Çë¸ßÊÖ¸øÒ»¸öaccessÌí¼ÓÒ»¸ö¿ÉÒÔΪnullµÄ×ֶεĴúÂë
ÈçÌ⣬ÔÚaccessÖÐÌí¼ÓÒ»¸ö¿ÉÒÔΪnullµÄ×ֶδúÂëÔõôд£¿
°ÑÊý¾Ý×Ö¶ÎÉèÖÃΪ ÔÊÐíΪ¿Õ
¾ÍÐÐÁË
Èç¹ûÄãµÄÊý¾Ý¿âÖиÃ×Ö¶ÎΪ·Ç¿ÕÏîÄ¿£¬¶øÄãÓÖÏëÍùÀïÃæÈëÒ»¸ö¿ÕÖµ¡£ÄÇôÄã¿ÉÒÔ²åÈëÒ»¸öÕâÑùµÄÖµ£º
DBNull.value
ÒÔÏÂÊÇÎÒÓÃÀ´´´½¨Êý¾Ý¿âµÄ´úÂ룬Êý¾Ý¿âºÍ±í¶¼Äܳɹ¦½¨Á¢¡£×¢Ê͵ôµÄÁ½ÐдúÂë·Ö±ðΪ´´½¨×Ö·ûÐÍ×ֶκÍÉèÖÃij×ֶαØÌîÊôÐԵĴúÂë¡£ÕâÁ½ÐдúÂë¶¼²úÉúÒì³££¬Çë¸ßÊÖÖ¸µã——¸ø³öÕýÈ·´úÂ룬лл£¡
VB.NET code:
Imports ADOX
Public Class Form1
'Ìí¼ÓÒýÓÃ
'Microsoft ActiveX Data Objects 2.x Library
'Microsoft ADO Ext. 2.x for DDL and Security
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim cat As Catalog = New Catalog()
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source= NewMDB.ACCdb")
Dim Cn As ADODB.Connection = New ADODB.Connection '¶¨ÒåÁ¬½Ó
Dim myTable As ADOX.Table = New ADOX.Table '¶¨Òåбí
Cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=NewMDB.ACCdb") 'Á´½Óµ½Êý¾Ý¿â
myTable.Name = "²âÊÔÏîÄ¿±í" '±íÃüÃû
cat.Tables.Append(myTable) '×·¼Ó±í
With myTable
.Columns.Append("Ö÷¼ü", DataTypeEnum.adInteger) '¸ø±í¡°²âÊÔÏîÄ¿±í¡± ´´½¨Ò»¸öеÄ×ֶΣ¬×Ö¶ÎÃû¡°Ö÷¼ü¡±
.Keys.Append(&q
Ïà¹ØÎÊ´ð£º
ÄÄÀï³ö´íÁË£¬Êä³öÕâÑùµÄ½á¹û£¿£¿
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......
DbgridÁ¬½Óaccess ÏÔʾÊý¾ÝʱÍ϶¯¹ö¶¯ÌõËÀ»ú£¿Ôõô½â¾ö°¡£¿
»úÆ÷Ì«²îÁ˰ɣ¿
ÊDz»ÊÇÄãÊý¾ÝÁ¿Ì«´óÁ˰¡
ÄãÊý¾ÝÉÙһЩ¿´¿´»¹ËÀ»úÂð£¿
Êý¾ÝºÜÉÙ°¡ ¾ÍÒ»Ò³¡£
ÎÒÔÚBCB6ÏÂ×ö¹ý²»ÉÙ DBGRID+ACCESS £¬´ÓÀ´Ã»ÓÐÓöµ½ ......
Çë´óÏÀÖ¸µã£¬¹òлÁË£¬×îºÃÓдúÂë
ÒªÓõ½ADOX¶ÔÏ󣬲éϰïÖúÎĵµ£¬
http://hyadliujing.blog.163.com/blog/static/4484507420091020969233/?mode=edit
ûÓÐÕÒµ½°¡ ¿´ÁËÄãµÄ²©¿ÍÁË£¬ÎÒÊÇÏ뽫accessÀïÃæµÄ¸½¼þ±£´æ ......
accessÖеÄtextÐ͵ÄÊý×Ö£¬Ôõô±È½Ï´óС°¡£¿
´ó¼ÒÖªµÀÂð?
ÒòΪÎÒÏë¸ù¾ÝÕâÒ»ÁÐÊý¾ÝµÄ´óС²éѯһЩ¶«Î÷
¾Ù¸öÀý×Ó£º
¾ÍÊÇ£¬ÎÒÓÐÒ»ÁÐÊý¾ÝΪ±àÂ룺
ÊÇtextÐ͵ÄÊý×Ö£ºÈç
1101
1102
1103
µÈ£¬
ÎÒÏÖÔÚҪȡ³ö±àÂë±È ......
±í½á¹¹:
table1
Ö¤¼þºÅ ʱ¼ä
X31 2010-01-11
3BC 2010-02-03
3AD 2010-02-03
F23 2010-02-09
......
ÏÖÔÚҪͳ¼ÆÒ»¸öʱ¼ä¶ÎÈç 2010-01-09 µ½ 2010-02-09¼äµÄÊý¾Ý,
ÆÚ´ý½ ......