| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 455 人关注过本帖
标题:请教一个问题
只看楼主 加入收藏
lihaoru
Rank: 1
等 级:新手上路
帖 子:74
专家分:0
注 册:2004-11-11
收藏
 问题点数:0 回复次数:4 
请教一个问题

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<script language="vbscript" runat="server">
Function DataToRsStatic(Conn,strSql)
Dim RsStatic
On Error Resume Next
Set DataToRsStatic = Nothing
If Conn Is Nothing Then
Exit Function
End If
Set RsStatic = Server.CreateObject("ADODB.RecordSet")
RsStatic.CursorLocation = 3
RsStatic.Open strSql,Conn,3,3
If Err.Number <> 0 Then
Exit Function
End If
Set DataToRsStatic = RsStatic
End Function
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
</script>


<body>
<%
Set outCallConn = CreateObject("ADODB.Connection")
outCallConn.open "Provider=IBMDADB2.1;Password=didwell;Persist Security Info=True;User ID=administrator;Data Source=hongta"
strSql = "SELECT * FROM T_NoteForSend fetch first 10 rows only"
set rstData = DataToRsStatic(outCallConn, strSql)
if rstData.eof or rstData.bof then
response.Write("<br>没有该客户资料<br>")
else
rstData.MoveFirst
Dim i
i = 1
%>
<table table cellspacing=1 cellpadding=0 border=0 width="101%" bgcolor="#c3bfb3">
<tr bordercolor="#000000">
<td bgcolor="#CCCCCC" class="td-detail"><div align="left"> 序号 </div></td>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left"> 信息标识 </div></td>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left"> 手机号码 </div></td>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left"> 短信内容 </div></td>
</tr>
<tr bordercolor="#000000">
<% Do While Not rstData.EOF %>
<td bgcolor="#FFFFFF" width="19%" id=num<%=i%>><%= i %></td>
<td bgcolor="#FFFFFF" width="22%"><div align="left" ><%= rstData("NoteSID") %></div></td>
<td bgcolor="#FFFFFF" width="23%"><div align="left" ><%= rstData("phonecode") %></div></td>
<td bgcolor="#FFFFFF" width="36%"><div align="left" ><%= rstData("NoteContent") %></div></td>
</tr>
<%
i = i + 1
rstData.MoveNext
Loop
rstData.Close
Set rstData = nothing
outCallConn.close
Set outCallConn=Nothing
End If
%>
</body>
</html>

我想把ID=num2的TD里的值取出来(不通过数据库,直接通过表的id取),请问应该怎么实现

2005-11-09 10:22
zmjls
Rank: 1
等 级:新手上路
帖 子:377
专家分:0
注 册:2005-9-30
收藏
得分:0 
从你的程序的架构来看,或许实现这功能不难!你看这样行不行!
request.form("select id from TD where ID=num2")

对ASP、.NET、SQL情有独钟的情圣王子! 俺目标:睡觉睡到自然醒数钱数到手抽筋!
2005-11-09 10:47
lihaoru
Rank: 1
等 级:新手上路
帖 子:74
专家分:0
注 册:2004-11-11
收藏
得分:0 
以下是引用zmjls在2005-11-9 10:47:45的发言:
从你的程序的架构来看,或许实现这功能不难!你看这样行不行!
request.form("select id from TD where ID=num2")

版主的说的话我还是不懂,能不能再说得再详细点

还有request.form能用在TABLE上吗?我新手,请赐教

2005-11-09 13:00
lihaoru
Rank: 1
等 级:新手上路
帖 子:74
专家分:0
注 册:2004-11-11
收藏
得分:0 
我写好后老是说缺少对像NUM2,请问是为什么?
2005-11-09 13:22
caiyakang
Rank: 2
等 级:新手上路
威 望:5
帖 子:2111
专家分:0
注 册:2005-3-24
收藏
得分:0 
&lt;input type=hidden value=&lt;%rs("")% name=""&gt;

中国人的财富网:http://www..cn/
2005-11-09 14:06
快速回复:请教一个问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.032668 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved