vb.net ×Ô¶¨ÒåÊý¾Ý¿âÁ´½ÓÀà(Access)
×Ô¶¨ÒåÊý¾Ý¿âÁ´½ÓÀà(Access)ÊÇÁ´½ÓAccessÊý¾Ý¿âʱʹÓõÄÀà¡£
²¹×㣺Application.StartupPath.ToStringÊÇÖ¸¶¨Éú³É.EXEÎļþµÄ·¾¶£¬°ÑÊý¾Ý¿âºÍÖ´ÐÐÎļþ´æ·Åµ½Ò»Æðʱ£¬²»¹Ü°²×°ºóÔÚʲô·¾¶¶¼ÎÞÐèÌØ¶¨Ö¸¶¨¡£
Imports System.Data.OleDb
#Region "È«¾Ö±äÁ¿"
Private mTimeout As Integer
Private mDbConn As OleDbConnection
Private mSqlConn As OleDbCommand 'SQLÖ´ÐÐ
Private sTblNm As String '´æ·ÅÊý¾ÝµÄ±íÃû
Private mbOpen As Boolean 'DBÁ´½ÓÅжÏÓÃ
Private mDbReader As OleDbDataReader
Private mDbTrans As OleDbTransaction
Private mbTran As Boolean = False 'Transaction¿ªÊ¼ÅжÏÓÃ
Private sSqlStr As String 'SQLÎÄ
Private mDbResult As DB_RESULT 'EXECUTE·½·¨µÄ´¦Àí½á¹û
Private mDbConnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Application.StartupPath.ToString & _
&nbs
Ïà¹ØÎĵµ£º
1.Ê×ÏÈ ddicÓÃ戶ÓÃ戶進È룬su01£¬輸ÈëÓÃ戶Ãû£¨“¼ÓÈëÎÒн¨Á¢µÄdev”£©£¬»Ø車£¬½¨Á¢Ò»個ÓÃ戶帳號£¬È»áá°Ñ設ÖÃÃÜ碼£¬profile選項ÖÐ輸Èë“SAP_ALL”(這個ÊÇSAP ALL 認證µÄÒâ˼)£¬±£ ......
Ò»Ö±ÏëдÏÂÊý¾Ý¿â²Ù×÷·½ÃæµÄ£¬Ö»ÊÇûʲôʱ¼ä£¨ºÃÏñÊǽè¿Ú£¬Ó¦¸ÃÊÇÀÁ»òÕßûÐÄÇé°É£¬ºÇºÇ£©¡£×î½ü·¢ÏÖCSDNÉÏ
»¹ÊÇÿÌìÓÐÈËÒªÎÊÕâЩÄÚÈÝ£¬ÎÒÓеÄʱºò¾ÍÀÁµÄ»Ø´ð£¬ºÇºÇ£¬Ö÷Òª²»¶ÏµÄÈ¥ÕÒ´úÂë¸øËûÃÇÀÛ°¡¡£ËùÒÔ»¹ÊÇÌý¸ßÈ˵ģ¬À´
¸öÒ»ÀÍÓÀÒÝ£¬×Ô¼ºÖØÐÂÎÂϰÏ£¬Ò²ºÃ¸øÆäËûÈËһЩ°ïÖú¡£
Õâ¸öÊ ......
using System;
using System.Data;
using System.Configuration;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.Data.OleDb;
/// <summary>
/// Data ......
ÕâһƪÎÒÔÙ˵˵ˮ¾§±¨±íµÄÇé¿ö¡£ACCESSÖжÔӦˮ¾§±¨±í·½Ã棬´ó¼Ò¿ÉÄÜ»áÓöµ½µÄ×î¶àµÄÎÊÌâÓ¦¸Ã¾ÍÊÇ´ò¿ª±¨±íºó
»á³öÏÖÐèÒªµÇ¼µÄÎÊÌâ¡£
Õâ¸öÊÇÎªÊ²Ã´ÄØ£¿Ã÷Ã÷ÎÒûÓÐÉèÖÃÃÜÂ룬Ôõô»áÓÐÒªÊäÈëÃÜÂëÄØ£¿Èç¹ûÄã¹»³Á×Å£¬Èç¹ûÄãµÄdebug¾Ñ鲻ȱ·¦µÄ»°£¬
Äã»á·¢ÏÖÔÚË®¾§±¨±íÌø³öÊäÈëÃÜÂëµÄµÇ¼¿òÖУ¬accessµÄ·¾¶²»ÊÇÎÒÏÖÔÚÊý¾Ý¿â· ......
GetAllSettings£¨appname£¬section£©
GetSetting£¨appname£¬section£¬key[£¬default]£© £º¶Áȡע²á±íÐÅÏ¢
SaveSetting appname£¬section£¬key£¬setting£ºÏò×¢²á±íÖÐдÈëÒ»¸ö×¢²áÐÅÏ¢
deletesetting appname£¬section£¬key£¬setting£ºÉ¾³ý×¢²á±íÐÅÏ¢
·appname£ºÓ¦ÓóÌÐòÃû£¬×Ö·û´®ÀàÐÍ£¬Óû§Ö¸¶¨
·sec ......