推薦：如何在 Access 里使用查詢建立 存儲(chǔ)過程/視圖, 并使用 ASP 執(zhí)行
摘要: 本文演示了 使用 Access查詢 構(gòu)造類似于 MSSQL 存儲(chǔ)過程的功能, 并在 ASP 中操作插入數(shù)據(jù),顯示數(shù)據(jù)功能. 目錄: 1. 在 Access 查詢里建表, 名 tt 2. 在 Access 查詢里新建查詢, 內(nèi)容為:... 3. 在 ASP 里使用 tt_insertParm 添加10條記錄到 表tt 3.1 構(gòu)造

/// 構(gòu)造函數(shù)，傳遞ACC參數(shù)查詢語(yǔ)句
/// </summary>
/// <param name="strsql">strsql字符型</param>
public accselect(string strsql)
{
sql = strsql;
}
/// <summary>
/// 構(gòu)造函數(shù)，傳遞ACC參數(shù)查詢語(yǔ)句
/// </summary>
/// <param name="strsql">參數(shù)查詢語(yǔ)句</param>
/// <param name="total">字節(jié)數(shù)</param>
public accselect(string strsql, int total)
{
sql = strsql;
t = total;
}
/// <summary>
/// 構(gòu)造函數(shù)
/// </summary>
/// <param name="strsql">參數(shù)查詢語(yǔ)句</param>
/// <param name="total">字節(jié)數(shù)</param>
/// <param name="value">OBJECT值</param>
public accselect(string strsql, int total, object value)
{
sql = strsql;
t = total;
v = value;
}
/// <summary>
/// getOdd方法返回OleDbDataReader
/// </summary>
/// <param name="odt">定義OleDbType類型</param>
/// <returns></returns>
public OleDbDataReader getOdd(OleDbType odt)
{
OleDbConnection conns = new OleDbConnection(this.conn);
OleDbCommand cmd = new OleDbCommand(this.sql, conns);
OleDbParameter parm = new OleDbParameter("temp", odt, this.t);
parm.Direction = ParameterDirection.Input;
cmd.Parameters.Add(parm);
cmd.Parameters[0].Value = this.v;
conns.Open();
OleDbDataReader oda = cmd.ExecuteReader();
cmd.Dispose();
return oda;
}
string Sql
{
get
{
return sql;
}
set
{
sql = value;
}
}
int T
{
get
{
return t;
}
set
{
t = value;
}
}
object V
{
get
{
return v;
}
set
{
v = value;
}
}
}
}
//調(diào)用方法
//accselect acc = new accselect();
//acc.sql = "select * from dtt where d_id=?";
//acc.t = 10;
//acc.v = 1;
//OleDbDataReader oda = acc.getOdd(OleDbType.VarChar);
//Repeater1.DataSource = oda;
//Repeater1.DataBind();

function acc_sql(sql,adotype,adodct,strlong,values)
dim connstring,mycmd,myrs,conn

connString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db1.mdb")
set conn = Server.CreateObject("Adodb.Connection")
conn.ConnectionString = connString
conn.open()
set mycmd = Server.CreateObject("ADODB.Command")
mycmd.ActiveConnection=conn
mycmd.CommandText=sql
mycmd.Prepared = true
set mypar = mycmd.CreateParameter("temp",adotype,adodct,strlong,values)
mycmd.Parameters.Append mypar
set myrs = mycmd.Execute
set acc_sql=myrs
end function
'調(diào)用方法
'dim rs
'sql="select * from users where id=? order by id"
'set rs=acc_sql(sql,3,1,4,1)
'if not rs.eof then
'response.Write(rs(1))
'end if
 

分享：如何設(shè)置Access項(xiàng)目中檢索的記錄數(shù)
在使用 Microsoft Access 項(xiàng)目的窗體或數(shù)據(jù)表中的數(shù)據(jù)時(shí)，為了提高性能，可以設(shè)置從 SQL Server 數(shù)據(jù)庫(kù)下載的最大記錄數(shù)。 1.在“導(dǎo)航”模式中打開數(shù)據(jù)表或窗體。 2.執(zhí)行下列操作之一： 從“記錄”菜單中選擇“最大記錄數(shù)”。 單擊導(dǎo)航按鈕右側(cè)的“最大記錄