关于存储过程问题(高分求解,分不够可以再给)

	登 录..      [注 册]      忘记密码      注销登录

<script type="text/javascript"> document.write('<img src="http://count.csdn.net/count/pageview1.asp?columnid=21&amp;itemid=14" border="0" width="0" height="0" />'); </script>

csdn.net	首 页 | 第二书店 | 社 区 | 专 题 | 精 华 | SUN | IBM | 微 软 | 微 创 | 书 社 | 《程序员》 | 调 查 | 聊 天 | 黄 页 新 闻 | Donews | 文 档 | FAQ | 专 栏 | 人 才 | 培 训 | 移 动 | 人 邮 | 清 华 | 《开发高手》 | 搜 索 | 软 件 | 会 员

<script language="javascript" type="text/javascript"> <!-- tmpDate = new Date(); date = tmpDate.getDate(); month= tmpDate.getMonth() + 1 ; year= tmpDate.getYear(); document.write(year); document.write("."); document.write(month); document.write("."); document.write(date); //--> </script>2005.10.12 2005.1.8

CSDN - 技术社区 - Web 开发 ASP问题
	回复 | 收藏此页 | 专题 | 公告 | 管理 | 保存 | 关闭窗口

我的问题 我参与问题 我得分问题 我的短消息 我的收藏夹 <script src="/adv/topic_ad.asp?id=3709370&roomid=301" type="text/javascript"> </script>

主　　题： 关于存储过程问题(高分求解,分不够可以再给) 作　　者： ukinxu (xxq) 等　　级： 信 誉 值： 100 所属社区： Web 开发 ASP 问题点数： 100 回复次数： 9 发表时间： 2005-01-08 15:33:36 我想在ASP中调用一个已存在的存储过程,将参数@NAME,@DATEE 传递给它并运行该存储过程最后将结果用EXECEL文档显示出来 请问大虾帮忙提供具体代码的范例? 回复人： alexzhang00(星级潜水员) ( ) 信誉：105 2005-01-08 15:58:00 得分: 0   汗 这么都要求，存储就得了，还要EXCEL显示， 唉。。。。。 Top 回复人： falconshh(香椿炒鸡蛋(学习java...)) ( ) 信誉：100 2005-01-08 16:01:00 得分: 0   '============执行注册存储过程============== call openDB() Set Comm=server.CreateObject("ADODB.Command") Set Comm.ActiveConnection=objconn Comm.CommandText="proc_userRegister" Comm.Parameters.Append Comm.CreateParameter("@UserName",200,1,20,UserName) Comm.Parameters.Append Comm.CreateParameter("@UserPassword1",200,1,20,UserPassword1) Comm.Parameters.Append Comm.CreateParameter("@PassQuestion",200,1,50,PassQuestion) Comm.Parameters.Append Comm.CreateParameter("@PassAnswer",200,1,50,PassAnswer) Comm.Parameters.Append Comm.CreateParameter("@NickName",200,1,20,NickName) Comm.Parameters.Append Comm.CreateParameter("@Sex",16,1,1,Sex) Comm.Parameters.Append Comm.CreateParameter("@reValue",200,2,20) Comm.execute reValue = Comm("@reValue") //返回值 set Comm.ActiveConnection=nothing set Comm=nothing call closeDB() '========================================= '系统错误处理 if reValue="Error" or err.number <> 0 then MsgError() Response.end elseif reValue="haveReg" then response.write "用户名或昵称已存在！" else response.write reValue end if Top 回复人： falconshh(香椿炒鸡蛋(学习java...)) ( ) 信誉：100 2005-01-08 16:02:00 得分: 0   偶也不想写太多 建议楼主自己在asp小类里面检索一下 很多的哦 Top 回复人： ukinxu(xxq) ( ) 信誉：100 2005-01-08 16:09:00 得分: 0   小妹是初学者,老大逼着近日内必须完成,请大虾们救救俺,谢谢,谢谢!!!! Top 回复人： whb147(苦乐随缘) ( ) 信誉：100 2005-01-08 16:41:00 得分: 0   这东西，不好写呀，要写也要几个小时， 其实，就是2个功能，写一个存储过程， 然后写一个导入到execl上的东西， 你就往这方面去找程序，很多的 Top 回复人： alexzhang00(星级潜水员) ( ) 信誉：105 2005-01-08 17:18:00 得分: 0   http://community.csdn.net/Expert/topic/3578/3578112.xml?temp=.2777216 Top 回复人： surferc((大妹子，缘分啊！)) ( ) 信誉：100 2005-01-08 17:20:00 得分: 0   表结构 TemTb id Sname UpTime 1 user1 2005-01-01 00:00:00 2 user2 2005-01-02 00:00:00 存储过程 create proc sp_search @Name varchar(200), --user @Datee varchar(200) --UpTime as select * from temtb where sname=@Name and upTime=@Datee Top 回复人： surferc((大妹子，缘分啊！)) ( ) 信誉：100 2005-01-08 17:26:00 得分: 0   asp脚本这里默认你使用的是sql server <% dim conn dim connstr on error resume next connStr="Provider=SQLOLEDB.1; Persist Security Info=True; Data Source=IP地址; Initial Catalog=数据库名称; User ID=用户名; Password=密码" set conn=server.createobject("ADODB.CONNECTION") conn.open connstr dim rs dim sql set rs=server.createobject("adodb.recordset") dim act,Sname,Datee,RsName,RsData,xlsName act=Trim(request("act")) Sname=Trim(request.form("Sname")) Datee=Trim(request.form("Datee")) if act="Search" and Sname<>"" and Datee<>"" and IsDate(Datee)=true then call SearchDate(Sname,Datee) end if '查询 sub SearchDate(Sname,Datee) sql="exec sp_search '"&Sname&"','"&Datee&"'" '-->招行存储过程 rs.open sql,conn,1,1 '这是得到表的列名 if not rs.eof then RsName=RS(0).Name for i = 1 to RS.Fields.Count - 1 RsName=RsName&chr(9)&RS( i ).Name next RsName=RsName&chr(13) RsData=RsName&Rs.GetString(2,-1,,," ") call CreateExcel() '生成xsl end if rs.close set rs=nothing end sub '生成excel sub CreateExcel() Dim fs,fl,path,ntime Set fs=Server.CreateObject("scripting.filesystemobject") path="/test/" ntime=cstr(Now) ntime=Replace(ntime,":","_") ntime=Replace(ntime," ","") Set fl=fs.CreateTextFile(Server.MapPath(path&ntime&".xls"),true) fl.Write RsData set fs=nothing xlsName=path&ntime&".xls" end sub conn.close set conn=nothing %> <form method="Post" action="?act=Search"> Name:<input type="text" Name="Sname"><BR> Datee:<input type="text" Name="Datee">这想你这里应该想输入日期<BR> <input type="submit" value="提交"> </form> <% '新开窗口显示生成的xls 我只是简单的用window.open打开的，你可以用其他方式打开。 if xlsName<>"" then xlsName=replace(xlsName,"/","//") response.write "<script>" response.write "window.open("""&xlsName&""");" response.write "</script>" end if %> Top 回复人： surferc((大妹子，缘分啊！)) ( ) 信誉：100 2005-01-08 17:30:00 得分: 0   这只是一个简单的示例但基本功能。基本思路就是这样了。 关于excel你也用网页格式，如<table><tr><td>rs(0)</td><td>rs(1)</td></tr></table>这样的，只要扩展名是xls，office2000以上的版本都可以自动识别的。 Top

name="XmlReply" marginwidth="0" marginheight="0" src=" /Expert/xsl/Reply_Xml.asp?Topicid=3709370" frameborder="0" width="750" scrolling="no" height="300">

	管理 | 关闭窗口

<script language="javascript" type="text/javascript"> <!-- google_ad_client = "pub-1076724771190722"; google_ad_width = 728; google_ad_height = 90; google_ad_format = "728x90_as"; google_ad_channel ="2163438289"; google_page_url = document.location; google_color_border = "336699"; google_color_bg = "FFFFFF"; google_color_link = "0000FF"; google_color_url = "008000"; google_color_text = "000000"; //--> </script>

<script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"> </script> name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-1076724771190722&dt=1105177899486&format=728x90_as&output=html&channel=2163438289&url=http%3A%2F%2Fcommunity.csdn.net%2FExpert%2Ftopic%2F3709%2F3709370.xml%3Ftemp%3D.523266&color_bg=FFFFFF&color_text=000000&color_link=0000FF&color_url=008000&color_border=336699&loc=http%3A%2F%2Fcommunity.csdn.net%2FExpert%2Ftopic%2F3709%2F3709370.xml%3Ftemp%3D.523266&u_h=768&u_w=1024&u_ah=738&u_aw=1024&u_cd=32&u_tz=480&u_his=1&u_java=true" frameborder="0" width="728" scrolling="no" height="90" allowtransparency="65535">

---

网站简介 - 广告服务 - 网站地图 - 帮助信息 - 联系方式
百联美达美公司 版权所有 京ICP证020026号
Copyright © CSDN.net, Inc. All rights reserved

border="0" src="http://universalmccannafa.allyes.com/main/adfshow?user=universalmccann|csdn|Homepage_Fullcolum_770_90_net&db=universalmccannafa&border=0&local=yes&js=ie" width="0" height="0">

name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-1076724771190722&dt=1129116357390&format=728x90_as&output=html&channel=2163438289&url=http%3A%2F%2Fblog.csdn.net%2Ffckeditor%2Feditor%2Ffckeditor.html%3FInstanceName%3DEditor_Edit_FCKEditor%26Toolbar%3DDefault&color_bg=FFFFFF&color_text=000000&color_link=0000FF&color_url=008000&color_border=336699&loc=http%3A%2F%2Fblog.csdn.net%2Ffckeditor%2Feditor%2Ffckeditor.html%3FInstanceName%3DEditor_Edit_FCKEditor%26Toolbar%3DDefault&u_h=768&u_w=1024&u_ah=740&u_aw=1024&u_cd=32&u_tz=480&u_his=4&u_java=true" frameborder="0" width="728" scrolling="no" height="90" allowtransparency="65535">