以独占的方式打开
文件--信息--加密/解密
PRovider=Microsoft.Jet.OleDb. 4.0 ;Jet OLEDB:DataBase Password= 123456789 ;Data Source= D:\ToWife.mdb; 1 . set dbconnection=Server.CREATEOBJECT( " ADODB.CONNECTION " ) DBPath = Server.MapPath( " customer.mdb " ) dbconnection.Open " driver={Microsoft Access Driver (*.mdb)};dbq= " & DBPath SQL = " select * from auth where id= "" & user_id & """ SET uplist = dbconnection.EXECUTE(SQL) 2 . set dbconnection=Server.CreateObject( " ADODB.Connection " ) DBPath = Server.MapPath( " customer.mdb " ) dbconnection.Open " provider=microsoft.jet.oledb.4.0;data source= " & dbpath SQL = " select * from auth where id= "" & user_id & """ SET uplist = dbconnection.EXECUTE(SQL) 3 . DBPath = Server.MapPath( " customer.mdb " ) set session( " rs " )=Server.CreateObject( " ADODB.Recordset " ) " rs=Server.CreateObject( " ADODB.Recordset " ) connstr= " provider=microsoft.jet.oledb.4.0;data source= " & dbpath SQL = " select * from auth where id= "" & user_id & """ session( " rs " ).Open sql,connstr, 1 , 3
连接access2007
1 OleDbConnection con = new OleDbConnection( @" Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=D:/数据库.accdb;Jet OLEDB:Database Password=123456;
连接access2003
OleDbConnection con = new OleDbConnection( @" Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin " ;Data Source=D:/数据库.mdb;Jet OLEDB:Database password= 123456 ; " )
建odbc源
set conn=server.createobject( " Adodb.connection " ) conn.open " DSN=xxx;UID=;PWD=123456;Database=XXX "
破解密码
1 public static string GetMDBPassword( string file) 2 { 3 // 未加密的MDB文件,0x42到0x61之间的每间隔一字节的数值 4 byte [] baseByte = { 0xbe , 0xec , 0x65 , 0x9c , 0xfe , 0x28 , 0x2b , 0x8a , 0x6c , 0x7b , 0xcd , 0xdf , 0x4f , 0x13 , 0xf7 , 0xb1 , }; 5 byte flagByte = 0x0c ; // 标志 0x62 处的数值 6 string password = "" ; 7 try 8 { 9 FileStream fs = File.OpenRead(file); 10 fs.Seek( 0x14 , SeekOrigin.Begin); 11 byte ver = ( byte )fs.ReadByte(); // 取得access版本, 1为Access2000/2003, 0为Access97 12 fs.Seek( 0x42 , SeekOrigin.Begin); 13 byte [] bs = new byte [ 33 ]; 14 if (fs.Read(bs, 0 , 33 ) != 33 ) return "" ; 15 byte flag = ( byte )(bs[ 32 ] ^ flagByte); 16 for ( int i = 0 ; i < 16 ; i++ ) 17 { 18 byte b = ( byte )(baseByte[i] ^ bs[i * 2 ]); 19 if (i % 2 == 0 && ver == 1 ) b ^= flag; // Access 2000/2003 20 if (b > 0 ) password += ( char )b; 21 } 22 } 23 catch { } 24 25 return ( password.Equals( "" ) ? " 没有密码! " : password ); 26 }
up
1 private int up( string sql) 2 { 3 int index = 0 ; 4 OleDbConnection con = GetCon(); 5 try 6 { 7 if (con!= null ) 8 { 9 con.Open(); 10 OleDbCommand oc = new OleDbCommand(sql, con); 11 return oc.ExecuteNonQuery(); 12 } 13 return 0 ; 14 } 15 catch (Exception) 16 { 17 return 0 ; 18 } 19 }
select
1 private DataTable select ( string sql) 2 { 3 DataTable dt = new DataTable(); 4 OleDbConnection con = GetCon(); 5 try 6 { 7 if (con!= null ) 8 { 9 con.Open(); 10 // 用 OleDbDataAdapter 得到一个数据集 11 OleDbDataAdapter myCommand = new OleDbDataAdapter(sql,con); 12 DataSet myDataSet = new DataSet(); 13 // 把Dataset绑定books数据表 14 myCommand.Fill(myDataSet); 15 con.Close(); 16 return myDataSet.Tables[ 0 ]; 17 } 18 con.Close(); 19 return null ; 20 } 21 catch (Exception) 22 { 23 con.Close(); 24 return null ; 25 } 26 }
主键的操作 Function AddPrimaryKey() ‘ 添加主键到[编号]字段 Dim strSQL As String strSQL = " ALTER TABLE 表1 ADD CONSTRAINT PRIMARY_KEY " _ & " PRIMARY KEY (编号) " CurrentProject.Connection.Execute strSQL End Function Function DropPrimaryKey() ‘ 删除主键 Dim strSQL As String strSQL = " ALTER TABLE 表1 Drop CONSTRAINT PRIMARY_KEY " CurrentProject.Connection.Execute strSQL End Function
C#access数据库操作
标签:
声明:本文来自网络,不代表【好得很程序员自学网】立场,转载请注明出处:http://www.haodehen.cn/did118549