如何使用数据绑定控件实现不换页提交数据?
发布时间:2010-05-16 15:17:00
如何使用数据绑定控件实现不换页提交数据?
Chunfeng.html
' 提交页面
< html>
< head>
< title> 本页提交 - aspxhome.com< /title>
< /head>
< !--DataSource is Data Binding control-->
< object classid="clsid:333C7BC4-460F-11D0-BC04-0080C7055A83" id="DataSource" VIEWASTEXT>
< param NAME="UseHeader" VALUE="True">
< param NAME="FieldDelim" VALUE=",">
< param NAME="DataURL" VALUE="ProcessData.asp?ID=0">
< /object>
< script for=DataSource event=ondatasetcomplete>
Name.value = "";
Age.value = "";
Age.disabled = true;
outputButton.disabled = true;
< /script>
< script>
var rowindex = 0;
function clickTR()
{
var srcElement = event.srcElement;
while(srcElement.tagName != "TR")
{
srcElement = srcElement.parentElement;
}
rowindex = srcElement.rowIndex;
Name.value = srcElement.cells(0).innerText;
Age.value = srcElement.cells(1).innerText;
Age.disabled = false;
outputButton.disabled = false;
}
function submitData()
{
var rs = DataSource.recordset;
rs.AbsolutePosition = rowindex;
if(rs("Name").value == Name.value && rs("Age").value == Age.value)
{
alert("Data no change"); return;
}
var szReturn;
szReturn = "ProcessData.asp?Name=" + Name.value + "&ID=" + rs("ID").value + "&Age=" + Age.value;
DataSource.DataURL = szReturn;
DataSource.reset();
outputButton.disabled = true;
}
< /script>
< body>
< table datasrc=#DataSource CELLPADDING="0" CELLSPACING="0" BORDER="1" WIDTH="100%">
< thead>
< th>姓名< /th>
< th>年龄< /th>
< /thead>
< tr style="Cursor:Hand" onclick="clickTR();" onmouseover="this.style.backgroundColor='silver';"
onmouseout="this.style.backgroundColor='white';">
< td><span datafld=Name>< /td>
< td><span datafld=Age>< /td>
< /tr>
< /table>
< hr>
< table width=100%>
< tr>
< td width=30%>姓名</td>
< td width=30%>年龄</td>
< td width=100%> </td>
< /tr>
< tr>
< td width=30%>< input style="width:100%" id=Name disabled>< /td>
< td width=30%>< input style="width:100%" id=Age disabled>< /td>
< td width=100%>< input type=button value="现在提交" id= outputButton disabled on click="submitData( );">< /td>
< /tr>
< /table>
< /body>
< /html>
ProcessData.asp
' 数据处理
< %@ Language=VBScript %>
< %
dim id
dim enter
enter = chr(10)
id = request.querystring("ID")
set d = server.createobject("scripting.filesystemobject")
if id < > 0 then
set read = d.opentextfile("c:\inetpub\wwwroot\test\Data.csv ")
set write = d.Createtextfile("c:\inetpub\wwwroot\test\ Data1.csv ")
dim index
dim string
id = id + 1
index = 1
while not read.AtEndOfStream
if index = id then
dim name
dim age
name = request.querystring("name")
age = request.querystring("age")
string = id - 1 & "," & name & "," & age
write.WriteLine(string)
read.ReadLine
else
write.writeLine(read.ReadLine)
end if
index = index + 1
wend
read.Close
write.Close
d.CopyFile "c:\inetpub\wwwroot\test\Data1.csv",
"c:\inetpub\wwwroot\test\ Data.csv "
d.DeleteFile "c:\inetpub\wwwroot\test\ Data1.csv "
end if
set file = d.opentextfile("c:\inetpub\wwwroot\test\ Data.csv ")
while not file.AtEndOfStream
Response.write (file.ReadLine)
Response.write enter wend file.Close %>
Data.csv
' 数据文件
ID:int,Name:string,Age:int
1,Victor, 23
2,Bill,31
3,kenny,31
4,hunter,24
猜你喜欢
- 每个进行过较大型的ASP-Web应用程序设计的开发人员大概都有如下的经历:ASP代码与页面HTML混淆难分,业务逻辑与显示方式绞合,使得代码
- 新手,看到很多网页上有显示/隐藏的菜单,可以显示隐藏层的同时控制FLASH的播放与停止。找了好久都找不到这个功能。。。还望高人指点当点击时就
- 人的大脑通过双眼来辨别视觉图形获取信息。大脑根据储存的经验,将所看到的视觉图形建立起优先级。由此可见,一个良好的视觉设计可以帮助大脑迅速有效
- 关于截取字符串指定长度的自定义函数很多,各式各样!不过大多原理都是一个样,循环字符串判断每一个字符的asc码!我这里也有一个,示例函数如下:
- 如果您的网站面向世界各地的冲浪者或者对外开展商贸活动,检测来访者的浏览器语言类型就非常现实了。这里提供的脚本可以检测流露;浏览器
- 看新闻说Chrome的Javascript引擎很强大,执行速度很快。就随便写了一个1,000,000次的累加放到IE和Chrome下测试,效
- 阅读上一篇:W3C优质网页小贴士(一) 使用 alt 属性描述每幅图像alt 属性有什么用?alt 属性可以在一系列标签中使用(如
- 需要的软件phpStudy 用来导入一个数据库api-server 数据库功能可以开启一个服务器,让开发环境可以使用生产环境的网址请求安装
- 'subject 信息标题 'company 发布信息的公司名称 'cont
- 50个常用sql语句 Student(S#,Sname,Sage,Ssex) 学生表 Course(C#,Cname,T#) 课程表 SC(
- 这个翻滚代码没有使用什么marquee或者其它位移方法,而是每隔一秒把列表最顶端的那个li删掉,把这个li里面的内容插入到最底端新生成的li
- 那么,现在如果给出一个权限编号,要去检索出用后这个权限的用户集合,就会需要在逗号分隔的多个权限编号中去匹配给出的这个权限编号。如果使用lik
- mysql是linux平台下最流行的数据库系统,今天介绍的是mysql的安装及简单的操作方法!groupadd mysql //建立mysq
- 所有数据库和状态文件都包含在其中。但是,在确定数据目录内容的布局中管理员有某些职责。本文讨论为什么要移动数据目录的各个部分(甚至是字典本身)
- Check In/Out功能简介:该功能是专门针对多用户管理而预设的。即多用户使用多帐号管理同一站点。
- 使用fso对象遍历指定文件夹函数:'遍历文件夹sub ListFolderContents(path) &nbs
- 网页制作中用到的特效字,你一定是用图象处理软件制作的吧!告诉你,不用图象处理软件,我也能做出漂亮的特效字来,你看,阴影字我就是这样做出来的。
- newstudent.asp<script LANGUAGE=″vbscript″ RUNAT=″Server″&
- 统计在线人数是实时的吗?实现起来也比较简单,见下列代码:global.asa<SCRIPT LANGUAGE="V
- 作为前端开发工程师,平时对于Dom的查找遍历和操作是家常便饭。对于优秀的前端来说,也肯定早已有了自己的一套方法来封装这些重复的操作。但是,现