| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 399 人关注过本帖
标题:请问yms123版主如下图如何用在ASP中实现,请帮助,谢谢
只看楼主 加入收藏
zhangliwei1
Rank: 1
等 级:禁止访问
帖 子:129
专家分:0
注 册:2009-8-9
结帖率:87.5%
收藏
已结贴  问题点数:20 回复次数:7 
请问yms123版主如下图如何用在ASP中实现,请帮助,谢谢
请问yms123版主如下图如何用在ASP中实现,请帮助,谢谢
实现功能为:
    输入出生年月日:此处为方框

   模型如上面,当点击"此处为方框"时自动显示选择时间的对话框,请问如何实现版主
搜索更多相关主题的帖子: yms ASP 
2009-09-01 16:58
zhangliwei1
Rank: 1
等 级:禁止访问
帖 子:129
专家分:0
注 册:2009-8-9
收藏
得分:0 
各位版主请帮忙
2009-09-01 17:31
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:14 
那个自动显示的网上有现成的控件可以下载。
2009-09-01 21:34
zhangliwei1
Rank: 1
等 级:禁止访问
帖 子:129
专家分:0
注 册:2009-8-9
收藏
得分:0 
请问yms123版主,那个控件名称是什么?如何查找?谢谢
2009-09-02 08:56
zhangliwei1
Rank: 1
等 级:禁止访问
帖 子:129
专家分:0
注 册:2009-8-9
收藏
得分:0 
<%   
dim rs,str,bh,ygh,pxsj,pxnr,pxdd,pxjg,rsMaxID,a
            
                  Set rsMaxID=conn.Execute("select MAX(编号) from pxinfo")
                  bh=rsMaxID.Fields(0).Value+1
                  rsMaxID.Close
                  Set rsMaxID=Nothing
   
ygh=session("ygh")
pxsj=request("pxsj")
pxnr=request("pxnr")
pxdd=request("pxdd")
pxjg=request("pxjg")
set rs=server.CreateObject("adodb.recordset")      
str="select * from pxinfo where 员工号='"&ygh&"'"
rs.open str,conn,1,3
rs.addnew
rs("编号")=bh
rs("员工号")=ygh
rs("培训时间")=pxsj
rs("培训内容")=pxnr
rs("培训地点")=pxdd
rs("培训结果")=pxjg
rs.update
response.Write"<script LANGUAGE='javascript'>alert('添加培训记录成功!');history.go(-2);</script>"
%>
</body>
</html>
版主例如上段代码,bh是我数据库里面的其中一个字段,我的问题是当我用清除数据库功能将表中的数据全部清除完后,为什么再用上段添加数据库记录代码添加时老是编号字段栏添加不上,但是当我事先在数据库内添加上一条记录后,再用上面的代码添加字段栏就能添加上,为什么??
2009-09-02 09:10
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
日期控件的名称就叫做日期输入控件,百度上搜索
                 Set rsMaxID=conn.Execute("select MAX(编号) from pxinfo")
                  bh=rsMaxID.Fields(0).Value+1
                  rsMaxID.Close
                  Set rsMaxID=Nothing
因为你数据库没记录时这条语句获取不到最新的编号,因此应该改为
                 Set rsMaxID=conn.Execute("select * from pxinfo order by 编号 DESC")
                 if rsMaxID.EOF Then
                    bh=1
                 else
                    bh=bh=rsMaxID("编号")+1
                 end if     
                  rsMaxID.Close
                  Set rsMaxID=Nothing
2009-09-02 10:34
zhangliwei1
Rank: 1
等 级:禁止访问
帖 子:129
专家分:0
注 册:2009-8-9
收藏
得分:0 
哇塞!你太厉害了,yms123版主.
请问你是从事什么工作的?方便回答吗?
2009-09-02 11:10
zhangliwei1
Rank: 1
等 级:禁止访问
帖 子:129
专家分:0
注 册:2009-8-9
收藏
得分:0 
请问版主有QQ号吗?可以加你为好友吗?
2009-09-02 11:11
快速回复:请问yms123版主如下图如何用在ASP中实现,请帮助,谢谢
数据加载中...
 
   



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

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