鸿 网 互 联 www.68idc.cn

当前位置 : 服务器租用 > 数据库 > Access > >

2012年计算机二级ACCESS的参数化查询(5)

来源:互联网 作者:佚名 时间:2015-10-07 07:55
string Sql { get { return sql; } set { sql = value; } } int T { get { return t; } set { t = value; } } object V { get { return v; } set { v = value; } } } } //调用方法 //accselect acc = new accselect(); //acc.sql = select * from dtt where
string Sql

  {

  get

  {

  return sql;

  }

  set

  {

  sql = value;

  }

  }

  int T

  {

  get

  {

  return t;

  }

  set

  {

  t = value;

  }

  }

  object V

  {

  get

  {

  return v;

  }

  set

  {

  v = value;

  }

  }

  }

  }

  //调用方法

  //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

  ’调用方法

  ’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

网友评论
<