| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 724 人关注过本帖
标题:随机位置批量添加内容 怎么实现??
只看楼主 加入收藏
sunfeiyao
Rank: 1
等 级:新手上路
帖 子:68
专家分:0
注 册:2011-9-7
结帖率:12.5%
收藏
已结贴  问题点数:10 回复次数:4 
随机位置批量添加内容 怎么实现??
例:表1有字段1(ID)、字段2(内容)

字段1(ID)         字段2(内容)
1               2、3、4、5、6、7、8
2               2、3、4、5、6、7、8
3               2、3、4、5、6、7、8
4               2、3、4、5、6、7、8
5               2、3、4、5、6、7、8

批量更新后为:

字段1(ID)         字段2(内容)
1               2、23、4、5、36、7、8
2               2、43、4、55、6、7、8
3               2、33、4、5、46、7、8
4               2、53、4、5、66、7、8
5               2、3、24、5、6、37、8

就是批量在字段2随机位置添加2个定义好的数字

求高手给段代码 学习一下




[ 本帖最后由 sunfeiyao 于 2012-6-13 08:41 编辑 ]
搜索更多相关主题的帖子: 位置 
2012-06-12 16:24
ysf0181
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:55
帖 子:914
专家分:2385
注 册:2006-10-4
收藏
得分:10 
'、3、4、5、6、7、8
'应:
'2、x3、x4、x5、x6、x7、x8

x2 = cstr(Rndstr(1))
.
x4 =cstr(Rndstr(2))


'其他的就不详细说了。你该懂了。
function Rndstr(jige_f)
     dim Strs,i,Str,N
     Strs="1234567890"
     Max=len(Strs)
     Randomize
     for i=1 to int(jige_f)
     N=int(Max*rnd+1)
     Str=Str+mid(Strs,N,1)
     next
     Rndstr=Str
     'response.write Rndstr
end function

ASP讨论QQ群:251346273
2012-06-13 15:33
sunfeiyao
Rank: 1
等 级:新手上路
帖 子:68
专家分:0
注 册:2011-9-7
收藏
得分:0 
没看明白 ,有具体点的代码吗??

随机位置批量添加内容 怎么实现??
例:表1有字段1(ID)、字段2(内容)

字段1(ID)         字段2(内容)
1               2、3、4、5、6、7、8
2               2、3、4、5、6、7、8
3               2、3、4、5、6、7、8
4               2、3、4、5、6、7、8
5               2、3、4、5、6、7、8

定义a,b,  批量更新后为:

字段1(ID)         字段2(内容)
1               2、a3、4、5、b6、7、8
2               2、b3、4、a5、6、7、8
3               2、a3、4、5、b6、7、8
4               2、b3、4、5、a6、7、8
5               2、3、b4、5、6、a7、8

就是批量在字段2随机位置添加2个定义好的内容
老师能给个具体代码  带注释那种吗,我搞了好几天了,不知道怎么弄??





[ 本帖最后由 sunfeiyao 于 2012-6-13 16:10 编辑 ]
2012-06-13 15:51
ysf0181
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:55
帖 子:914
专家分:2385
注 册:2006-10-4
收藏
得分:0 
set rs = server.createobject("adodb.recordset")
for i = 1  to 5
  x2 = 2
  x3 = Rndstr(2)
  x4 = Rndstr(2)
  x5 = Rndstr(2)
  x6 = Rndstr(2)
  x7 = Rndstr(2)
  x8 = 8
  neirong = x2&"、"&x3&"、"&x4&"、"&x5&"、"&x6&"、"&x7&"、"&x8
  rs.open"select * from 表",conn,1,3
  rs.addnew
  rs("字段2") = neirong
  rs.update
  rs.close
next
set rs = nothing

function Rndstr(jige_f)
     dim Strs,i,Str,N
     Strs="123456789ab"
     Max=len(Strs)
     Randomize
     for i=1 to int(jige_f)
     N=int(Max*rnd+1)
     Str=Str+mid(Strs,N,1)
     next
     Rndstr=Str
     'response.write Rndstr
end function

ASP讨论QQ群:251346273
2012-06-13 17:12
sunfeiyao
Rank: 1
等 级:新手上路
帖 子:68
专家分:0
注 册:2011-9-7
收藏
得分:0 
  老师,我描述错了,是想在原有的内容中插入点内容

随机位置批量插入内容 怎么实现??
例:表1有字段1(ID)、字段2(内容)

原有数据:

字段1(ID)         字段2(内容)
1               2、3、4、5、6、7、8
2               2、3、4、5、6、7、8
3               2、3、4、5、6、7、8
4               2、3、4、5、6、7、8
5               2、3、4、5、6、7、8

定义a,b,  批量更新后为:

字段1(ID)         字段2(内容)
1               2、a3、4、5、b6、7、8
2               2、b3、4、a5、6、7、8
3               2、a3、4、5、b6、7、8
4               2、b3、4、5、a6、7、8
5               2、3、b4、5、6、a7、8

就是批量在字段2随机位置插入2个定义好的内容
老师能给个具体代码  带注释那种吗,我搞了好几天了,不知道怎么弄??
2012-06-14 16:13
快速回复:随机位置批量添加内容 怎么实现??
数据加载中...
 
   



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

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