我刚从ASP换成php,我对php处理记录集的方式有点困惑。我想知道有没有通过创建php类来迭代记录集的更简单的方法。下面是ASP语法来说明我的意思:
sq = "select * from myData"
set rs = db.execute(sq)
do while not rs.eof
response.write rs("name") // output data (response.write = echo)
rs.movenext
loop
有什么想法吗?谢谢
我正在使用经典的ASP,其中有一个管理员和其他用户的单一登录表单。我能够将管理员和用户重定向到不同的页面,但对于新用户,我希望他们在首次登录时转到身份验证页面。我该如何处理它。我不太擅长使用会话,事实上,我使用会话变量将用户和员工导航到不同的页面。会话也会在其中扮演角色吗??
这是我用来将用户和管理员导航到不同页面的工具
Session("Username")=request.form("user_name")
if request.Form("sub_but") <> "" then
sql =
我有个问题。我有一段带有JScript的ASP代码如下所示:
var stringa = "Driver=SQL Server;Server=xxx;Database=xxx;Uid=xxx;Pwd=xxx;";
var cn = new ActiveXObject("ADODB.Connection");
var rs = new ActiveXObject("ADODB.Recordset");
cn.Open(stringa);
var SQL = "SELECT * FROM pippo"
rs.Open(SQL, cn,
我对asp非常陌生。这是我的密码:
response.write("<script>")
do until rs.EOF
for each x in rs.Fields
response.write(" var ")
response.write("CC=" & x.value)
next
rs.MoveNext
loop
response.write("</script>")
如何使输出为var CC1= x.value,然后使下一个循环返回为var CC2=x.val
我试图从一个典型的ASP应用程序中调用一个存储过程,并且正在引发一个3709错误。这种联系是不可能的..。错误。
On Error Resume Next
set ConnectionStr = "driver=SQL Server;server=***;uid=***;pwd=***;database=***"
Set cmd = Server.CreateObject("ADODB.Command")
With cmd
Set .ActiveConnection = ConnectionStr
.CommandType = adCmdS
我试图在用经典ASP生成的链接中插入变量的文本,但到目前为止我正在删除。我试图链接到另一个页面,其中包含订单ID作为链接的一部分。链接本身显示正常,但是strOID没有插入到链接中。
是否有一种更简洁、更简洁的方法来生成嵌入变量的链接?
我的代码是:
<%
Dim strOID
if not rs.EOF then
do
strOID = rs("oid_num")
Response.Write "<tr><td width='12%'><
请帮我解析一个文件。我正在画一个真实的例子。
输入:
1 1014143 rs786201005 C T . . RS=786201005;RSPOS=1014143;dbSNPBuildID=144;SSR=0;SAO=1;VP=0x050068000605000002110100;GENEINFO=ISG15:9636;WGT=1;VC=SNV;PM;PMC;NSN;REF;ASP;LSD;OM;CLNALLE=1;CLNHGVS=NC_000001.11:g.1014143C>T;CLNSRC=OMIM_Allelic_Variant;CLNORIGIN=1;C
使用经典的asp,我尝试查询SQL Server数据库,如下所示:
strSQL = "select column_1, column_2, column_3, column_4 from someview " &_
"where RecordNo=" & i
set rs=conn.Execute(strSQL)
if not rs.eof then
A = rs("column_1")
B = rs("column_2")
C = rs("column_3&
我有一段代码,它从数据库中取出几行数据,然后创建一个字典对象,并将其放入一个数组中。
do while index < rs.RecordCount or (not rs.EOF)
set dict = Server.CreateObject("Scripting.Dictionary")
for each x in rs.fields
temp = x.value
dict.add lcase(x.name), temp
next
set records(index) = dict
index = index + 1
rs.
我正在写经典的ASP一个函数,我必须在一个函数中使用2个program.In语句来更新一个表。第一个语句是更新发票数量,第二个更新语句是基于更新的采购订单数量和请购单数量,我需要更新一个标志字段。我可以像下面这样写相同的函数吗:
SET RS = app.Execute("SELECT PRInvoiceNo, Quantity FROM PurchaseOrderDetails WHERE CoID='" & param & "'")
do while RS.EOF=false
app.Execute(
我有一个我想在IIS上运行的网站,但是在登录页面上,当我试图连接时,我从文件(Access.asp)中得到了这个错误。
以下是文件代码:
<%@ Language=VBScript %>
<!--#include file="PerformClear.asp"-->
<!--#include file="expire.vbs"-->
<%'Déclarations de toutes les variables de cette page
dim login, password, numu
dim sql, rs
我正在尝试比较从调用我的login_form.asp验证页面的login.asp中存储的输入(用户名和密码)。除了regex条件之外,我的代码还在工作。在继续之前,当我添加if语句以比较条件时,页面会崩溃。我只希望在尝试连接之前允许输入-Z0-9。如果我注释掉if条件,表单验证就能工作,而不是regex。这是ASP经典。谢谢你的见解和帮助。
下面是我正在使用的代码:
dim userName, password, query
dim conn, rs
Dim reg
Set reg = new RegExp
reg.Pattern = "[a-z0-9] + @[a-z0-9\.] +
请考虑一个有min的网站。每天有30.000游客。
该站点是使用sql 2008用asp编写的。
有那么多的行和这么多的数据库连接
我使用记录集如下所示
set rs=server.createobject.......
set rs2=server.createobject.......
set rs3=server.createobject.......
我把这一行放在页面的顶部。当我需要的时候,我就用它们;
rs.open "select........."
rs.close
我每页大概用3次。
在这页的底部我写了
set rs=nothing
set rs2=nothi
这与经典ASP代码相关。页面获取特定ProjectCode的数据。
有一个常规文本字段,其中显示所选项目代码的站点位置。我想将其更改为下拉列表,以便用户可以从可用选项(从数据库获取)中更改站点位置,然后保存它。此外,在页面加载项目代码的网站位置应选择该特定的条目。
我已经添加了以下代码到我的页面,但它不工作(当然,我是新的经典ASP)。
strSQL = "SP_GET_SiteLocation"
Set rsSiteList = RunSQLQuery(strSQL)
'show the list
If Not rsSiteList.
我遇到了一个非常奇怪的问题。最近,我的一个客户把他们的网站(经典的asp)移到了一个新的服务器(2008/IIS7/MSSQL 2005),现在我得到的记录集字段没有数据。当我分析SQL查询时,我看到查询正在运行,当我在SSMS中重新运行它时,它将返回所有字段的数据。例如,sql查询返回:
Col1 Col2
John Smith Blue
Jane Doe Red
但是当我遍历数据集时,我得到了
Col1 Col2
John Smith
Jane Doe
我不知道这是怎么发生的,我想知道是否有人遇到过类似的问题?代码如下:
di
我在我的网站上看到以下错误:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[MySQL][ODBC 3.51 Driver][mysqld-5.1.73-community]Build WHERE -> insert_fields() failed.
/new_m_save.asp, line 475
new_m_save.asp中的第475行是:
RS.Open sql,CNopen,3,2
RS("PT_peoolaNum")=Las