asp查询数据库数据(asp网站数据库)
ASP怎么查询数据库
大体思路应该是这样的:
strSql="SELECT * FROM 数据表 WHERE 比较字段='" request.Form("查询要求") "'"
objRS.Open strSql,objConn,1,1
if objRS.RecordCount =0 then
strRlt="没有数据"
else
SELECT CASE objRS("另一个字段")
Case "比较1"
strRlt="返回数据1"
Case "比较2","比较3"
strRlt="返回数据2"
Case "比较4"
strRlt="返回数据3"
Case Else
strRlt="返回数据4"
End Select
end if
objRS.close
ASP 如何实现查询 数据库文件!
分类: 电脑/网络 程序设计 其他编程语言
解析:
连接access数据库
asp数据库
一、
%
dim conn
dim dbpath
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("8301")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" DBPath
%
二、
%
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("rc/lzh")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)}"
Conn.Open connstr
%
dim ipconn
set ipconn=server.createobject("ADODB.CONNECTION")
ipconn.open "DBQ="server.mappath("ip.mdb")";DRIVER={Microsoft Access Driver (*.mdb)};"
dim rs,sql
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select top 1 ip_b,ip_c from ip where (ip_s=" ip " and ip_e=" ip ")"
rs.Open sql,ipconn,1,1
if rs.eof or rs.bof then
getaddress="未知|未知"
Else
getaddress=rs(0)"|"rs(1)
end if
mdb数据库
一、
%dim coon
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("***********/123.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)}"
Conn.Open connstr
%
二、
dim conn
set conn = server.createobject("adodb.connection")
conn.open = "provider=microsoft.jet.oledb.4.0;" "data source = " server.mappath("../db/bbs.mdb")
三、
%@ language=VBs cript%
%
dim conn,mdbfile
mdbfile=server.mappath("数据库名称.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="mdbfile
%
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
4.
建odbc源xxx
set conn=server.createobject("Adodb.connection")
conn.open "DSN=xxx;UID=;PWD=;Database=customer
SetConn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("aaa/bbspp1.mdb")+";DefaultDir=;
DRIVER={Microsoft AccessDriver(*.mdb)};DriverId=25;FIL=MSAccess;
ImplicitCommitSync=Yes;
MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;
Threads=3;UserCommitSync=Yes;"
Conn.Openconnstr
说明: 其中SetConn=Server.CreateObject("ADODB.Connection")为建立一个访问数据的对象, server.mappath(aaa/bbspp1.mdb)是告诉服务器access数据库访问的路径
conn的内容如下:
%
dim conn,rs
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="server.mappath("mdb/mfkiqpl.mdb ")
set rs=server.createobject("adodb.recordset")
set rs.activeconnection=conn
%
还不懂啊 加偶的QQ 直接问吧
asp怎样查询数据库
首先创建SqlConnection对象连接数据库,然后定义查询字符串,最后对GridView控件进行数据绑定。
示例:
下面通过一个示例介绍在ASP.NET 2.0应用程序中如何查询数据库中记录。
新建一个网站,默认主页为Default.aspx,在Default.aspx页面上分别添加一个TextBox控件、一个Button控件和一个GridView控件,并把Button控件的Text属性值设为“查询”。该页在实现时,首先编写一个GridView控件数据绑定方法bind(该方法请参见5.3.2中bind方法),并在Page_Load事件中调用该方法显示数据库中记录,具体代码如下。
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
this.bind();
}
}
然后在【查询】按钮Click事件下编写实现数据库查询操作的代码,具体代码如下。
protected void Button1_Click(object sender, EventArgs e)
{
if (TextBox1.Text != "")
{
string str = "select * from Region where RegionID='" + TextBox1.Text.Trim() + "'";
sqlconn = new SqlConnection(sqlstr);
sqlconn.Open();
SqlCommand sqlcom = new SqlCommand(str,sqlconn);
int result = Convert.ToInt32(sqlcom.ExecuteScalar());
if (result 0)
{
SqlDataAdapter myda = new SqlDataAdapter(str, sqlconn);
DataSet myds = new DataSet();
myda.Fill(myds);
GridView1.DataSource = myds;
GridView1.DataBind();
sqlconn.Close();
}
else
Response.Write("scriptalert('没有相关记录')/script");
}
else
this.bind();
}
asp查询数据库
个人建议在
先将On Error Resume Next 注释
然后测试程序是否有问题,
如果程序仍然存在上述情况,则继续执行如下调试。
do while not rs.eof '循环开始
response.write rs("newstitle") '显示数据
rs.movenext
循环中增加一个语句,将你执行的结果显示到页面中
do while not rs.eof '循环开始
response.write rs("newstitle") '显示数据
response.flush()'不缓存,直接将结束显示到页面
rs.movenext
增加response.flush()语句之后再重新测试程序,
看输出结果,然后在看是否有问题。