Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

access µ¼Èë access ת»»ÎÞЧ!ÔÚÏßµÈ!

´ÓÀàÐÍ"DBNULL" µ½ÀàÐÍ¡°Double¡±µÄת»»ÎÞЧ£¨Êý¾Ý¿âÖжÔÓ¦µÄ a3 »òa5 ûÓÐÊý¾ÝÊÇΪ¿Õ£©
,ÇëÎÊÎÒÔõô´¦Àí£¡

VB.NET code:

Dim a1 As String = Nothing
Dim a2 As String = Nothing
Dim a3 As Integer
Dim a4 As String = Nothing

Dim a5 As Double
Dim a6 As String = Nothing
Dim a7 As String = Nothing

Dim SQL As String = Nothing
For s As Integer = 0 To dsin.Tables("kscjin").Rows.Count - 1
a1 = dsin.Tables("kscjin").Rows(s).Item("kh") & ""
a2 = dsin.Tables("kscjin").Rows(s).Item("xbdm") & ""
a3 = dsin.Tables("kscjin").Rows(s).Item("xh")
a4 = dsin.Tables("kscjin").Rows(s).Item("cj") & ""
a5 = dsin.Tables("kscjin").Rows(s).Item("df")
a6 = dsin.Tables("kscjin").Rows(s).Item("zh") & ""
a7 = dsin.Tables("kscjin").Rows(s).Item("sxh") & ""
SQL = "insert into kscj(kh,


Ïà¹ØÎÊ´ð£º

asp¸úAccessÊý¾ÝÁ¬½ÓÎÊÌâ¡£

IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)

'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
S ......

Çë¸øÒ»¸öACCESS¶àÌõ¼þ²éѯµÄÀý×Ó

Çë¸øÒ»¸öACCESS¶àÌõ¼þ²éѯµÄÀý×Ó,×Ö¶Î:ÐÕÃû,µç»°,¹«Ë¾,µØÖ·Îª²éѯÌõ¼þ,Ö»Òª²»Îª¿Õ,¾Í×÷Ϊ²éѯÌõ¼þ.
ÄãÏÈ給這個Щ×Ö¶Î設ÖÃ變Á¿並賦³õÖµ為:%,
ÔÙÔÚ²é詢 ......

ACCESSÊý¾Ý¿â¹ØÁª²éѯÎÊÌ⣿

³õÓÃACCESSÊý¾Ý¿â£¬ÒªÊµÏÖÒ»¸ö¹ØÁª²éѯ£¬sqlÓï¾äÈçÏ£ºselect pid,product_Type.name as tid,name,img_url,context,remark from Product join product_Type on product.type_id = product_Type.type_id order by pid ......

accessÌå»ý

Ò»¸ö³ÌÐòÍùaccessÊý¾Ý¿âÀïÃæÐ´¼Ç¼£¬Ã¿Ììд5ÍòÌõ£¬µÚ¶þÌìɾ³ýǰһÌìµÄ5ÍòÌõ
µ«ÊÇaccessÎļþµÄÌå»ý»áÂýÂýÔö¼Ó¡£¡£¡£
ÎÒ²»Ñ¹ËõÊý¾Ý¿âµÄÇé¿öÏ£¬Ê²Ã´Ê±ºòÊý¾Ý¿âµÄÌå»ý²Å²»Ôö¼ÓÄØ£¿

ÎÒɾ³ý¼Ç¼µÄʱºò£¬Êý¾Ý¿âÌå ......

Access Êý¾ÝÉýǨµ½ SQLServer2005

ÎÒÔ­±¾ÊÇÓÃACCESSµÄÊý¾Ý¿â£¬ÏÖÔÚ¸ÄÓÃSQLServer2005ÁË£¬ËùÒÔÏë°Ñ֮ǰµÄÊý¾ÝÈ«¶¼µ¼µ½SQLSERVERÀïÀ´¡£
ÏÖÓÐÎÊÌâÈçÏ£º

1:¸ÄÓÃSQLserverºó£¬Êý¾Ý¿âµÄ½á¹¹Óи͝¡£Ô­±¾ÔÚaccessÖÐËùÓеĵ¥¾ÝÓÃÒ»¸ö¡°µ¥¾ÝÐÅÏ¢¡±Ö ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ