非ADO? [英] Non-ADO?
问题描述
如果我使用ASP并访问Access数据库,但我没有使用ADO,
我使用的数据库方法的名称是什么?
If I am using ASP and access an Access database, but I am not using ADO,
what is the name of the database methodology I am using ?
推荐答案
向我们展示一些代码怎么样?
-
Patrice
" PW" < PW *** @ SPAMbigpond.net.au> écritdansle message de news:
uL ******* *******@TK2MSFTNGP04.phx.gbl ...
What about showing us some code ?
--
Patrice
"PW" <pw***@SPAMbigpond.net.au> a écrit dans le message de news:
uL**************@TK2MSFTNGP04.phx.gbl...
如果我使用ASP并访问Access数据库,但我没有使用ADO,
我正在使用的数据库方法名称是什么?
If I am using ASP and access an Access database, but I am not using ADO,
what is the name of the database methodology I am using ?
PW写道:
如果我使用ASP并访问Access数据库,但我没有使用
ADO,我使用的数据库方法名称是什么?
If I am using ASP and access an Access database, but I am not using
ADO, what is the name of the database methodology I am using ?
我们应该读懂你的想法吗?给我们举个例子。
-
Microsoft MVP - ASP / ASP.NET
请回复新闻组。这个电子邮件帐户是我的垃圾邮件陷阱所以我
不经常检查它。如果您必须离线回复,请删除
无垃圾邮件
Are we supposed to read your mind? Give us an example.
--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I
don''t check it very often. If you must reply off-line, then remove the
"NO SPAM"
" Bob巴罗斯[MVP]" <再****** @ NOyahoo.SPAMcom>在留言中写道
新闻:%2 **************** @ TK2MSFTNGP02.phx.gbl ...
"Bob Barrows [MVP]" <re******@NOyahoo.SPAMcom> wrote in message
news:%2****************@TK2MSFTNGP02.phx.gbl...
PW写道:
如果我使用ASP并访问Access数据库,但我没有使用ADO,我使用的数据库方法名称是什么?
If I am using ASP and access an Access database, but I am not using
ADO, what is the name of the database methodology I am using ?
我们应该读懂你的想法吗?举个例子。
-
Microsoft MVP - ASP / ASP.NET
请回复新闻组。这个电子邮件帐户是我的垃圾邮件陷阱所以我不经常检查它。如果您必须离线回复,请删除
无垃圾邮件
Are we supposed to read your mind? Give us an example.
--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I
don''t check it very often. If you must reply off-line, then remove the
"NO SPAM"
Apoogies,因为之前未发布示例...
< td>
myDSN =" DRIVER = {Microsoft Access Driver(* .mdb)}; DBQ = QUOT; &
会话(" SystemDatabaseName")
set rs1 = server.createobject(" adodb.recordset")
rs1.CursorLocation = 3
rs1.CursorType = 3
mySQL =""
mySQL = mySQL& SELECT DISTINCT
mySQL = mySQL& " ESCI,ESCN"
mySQL = mySQL& FROM
mySQL = mySQL& " QTags"
mySQL = mySQL& ORDER BY
mySQL = mySQL& " ESCI"
rs1.open mySQL,myDSN
myQueryString = Request.QueryString(" lbESCI")
mySearchString = Request.QueryString(" txtSearch")
< form method =" GET" action =" index.asp">
< input type =" submit"值= QUOT确定]; style =" width:
<%= Session(" SystemButtonWidth")%> ;;高度:
<%=会话(" SystemButtonheight")%>;">
Q-TAGS SELECTION LIST
< br>
< SELECT name =" lbESCI" size =" 9"
style =" font-size:10; color:BLACK; font-family:ARIAL">
<%
Do while not rs1.EOF
if mySearchString<> ""然后
如果rs1(ESCI)= mySearchString那么
response.write"< option selected>"
else
response.write"< option>"
end if
elseif rs1(" ESCI")= left(myQueryString,6 )然后
response.write"< option selected>"
else
response.write"< option>"
结束如果
myOption = rs1(" ESCI")& " | " &安培; rs1(ESCN)
response.write myOption
response.write"< / option>"
rs1.MoveNext
循环
response.write"< / select>"
%>
< / form>
< / td>
Apoogies for not posting an example before ...
<td>
myDSN="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
Session("SystemDatabaseName")
set rs1=server.createobject("adodb.recordset")
rs1.CursorLocation = 3
rs1.CursorType = 3
mySQL = ""
mySQL = mySQL & "SELECT DISTINCT"
mySQL = mySQL & " ESCI, ESCN "
mySQL = mySQL & "FROM "
mySQL = mySQL & " QTags "
mySQL = mySQL & "ORDER BY "
mySQL = mySQL & " ESCI "
rs1.open mySQL,myDSN
myQueryString = Request.QueryString("lbESCI")
mySearchString = Request.QueryString("txtSearch")
<form method="GET" action="index.asp">
<input type="submit" value="Ok" style="width:
<%=Session("SystemButtonWidth")%>; height:
<%=Session("SystemButtonheight")%>;">
Q-TAGS SELECTION LIST
<br>
<SELECT name="lbESCI" size="9"
style="font-size:10;color:BLACK;font-family:ARIAL">
<%
Do While Not rs1.EOF
if mySearchString <> "" then
if rs1("ESCI") = mySearchString then
response.write "<option selected>"
else
response.write "<option>"
end if
elseif rs1("ESCI") = left(myQueryString,6) then
response.write "<option selected>"
else
response.write "<option>"
end if
myOption = rs1("ESCI") & " | " & rs1("ESCN")
response.write myOption
response.write "</option>"
rs1.MoveNext
Loop
response.write "</select>"
%>
</form>
</td>
这篇关于非ADO?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!