ÎÒÊ×ÏȽ¨ÁËÒ»¸öAccessÊý¾ÝÔ´£¬VC¹¤³ÌÎÊSMys£¬¶ÔÓ¦µÄ×Ö¶ÎÓÐ
¹¤×÷ʱ¼ä SMysSetÖжÔÓ¦±äÁ¿ m_gzsj
»é·ñ SMysSetÖжÔÓ¦±äÁ¿ m_hf
»ù±¾¹¤×Ê SMysSetÖжÔÓ¦±äÁ¿ m_jbgz
ËùÔÚ²¿ÃÅ SMysSe ......
Êý¾Ý¿âÓÃaccess Êý¾Ý¿âÃûÊÇuser ±íÃûÊÇuser ×Ö¶ÎÊÇusername,password
´úÂëÈçÏ£ºµ«ÊÇÓдíÎó£¬Çë¸ßÊÖÃǰï°ïæָ³ö£¬Ð»Ð»
Option Explicit
Dim cnt As Integer '¼Ç¼ȷ¶¨´ÎÊý
Private Sub cmdCancel_Click()
Unload Me
End Sub
Private Sub cmdOK_Click()
Dim strAccess As String
Di ......
ÎÒÔÚ¿´±ðÈ˵ÄÒ»¸öÏîÄ¿£¬ ËûµÄÊý¾Ý¿âÊÇÓÃACCESSµÄ£¬ µ±ÎÒ´ò¿ªMDBÎļþºó£¬ µã»÷²éÑ¯Ò³Ãæ£¬ ·¢ÏÖÓкܶà²éѯÊÓͼ£¬ ÇëÎÊÕâЩ²éѯÊÓͼÓÐʲôÓô¦Â𣬠ÎÒÔÚ³ÌÐòÀï²»ÊÇÒ»Ñù¿ÉÒÔÓÃSQLÓï¾ä×öÂ𣬠ΪʲôҪ×öºÜ¶à²éѯÊÓÍ¼ÄØ£¬ ÓÐʲôºÃ´¦£¬ ÔõôÔÚ³ÌÐòÖÐÓÃÕâЩÊÓÍ¼ÄØ£¿
Õâ¸öÎÊÌâÊôÓÚ»ù´¡¸ÅÄî¡£¡¡²»Á˽âÄãĿǰµÄˮƽ£¬ËùÒÔ²»ÖªµÀ´ÓÄÄÒ ......
VB.NET code:
Dim strSql As New StringBuilder()
strSql.Append("select * from ¶¨µ¥ where 1=1 ")
strSql.Append(" and ʱ¼ä >= @¿ªÊ¼Ê±¼ä and ʱ¼ä <= @½áÊøÊ±¼ä and Õ˺Å=@Õ˺Å")
Dim parameters As OleDbParameter() = {New OleDbPa ......
Select * from [Table1] Where [ColourNo] = '' And [Length] & '' = ''.
ÔÚAccess ʹÓøÃsqlµÄʱºò£¬ ÇëÎÊÕâ¸ö [Length] & '' = ''ÊÇʲôÒâ˼£¿
·ÀÖ¹[Length]Ϊ£Î£Õ£Ì£Ì
[Length]£º×Ö¶ÎÃû OR ±äÁ¿Ãû
[Length] & '' = '':
×Ö¶Î OR ±äÁ¿ ......
<add name ="AccessDataConn" connectionString="=|DataDirectory|Data.mdb" providerName="System.Data.OleDb"/>
ÕâÑù²»¶ÔÂ𣿠»¹ÊÇȨÏÞÎÊÌ⣿
App_Data ϵÄÊý¾Ý¿â accessÊý¾Ý¿â °¡ ²Å¿´¼û¶àÁ˸öµÈºÅ
ÓÃ|¿ÉÒÔÃüÃû£¿ ²»ÊÇ·Ç·¨×Ö·û£¿
<configuration>
......