| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 433 人关注过本帖
标题:读取赋值问题
只看楼主 加入收藏
kevinxu0638
Rank: 2
来 自:江苏
等 级:论坛游民
帖 子:147
专家分:62
注 册:2009-10-19
结帖率:100%
收藏
 问题点数:0 回复次数:2 
读取赋值问题
<% Option Explicit %>
    <%  
    Dim X_id
        X_id=request.QueryString("id")
    Dim db,rs,sql,a,objFSO
    Set db=Server.CreateObject("ADODB.Connection")
    db.Open "background"
    set rs=server.CreateObject("adodb.recordset")  
sql="Select * From lh where id="&Cint(X_id)
    db.Execute(Sql)
a=rs("imgsrc1")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")  
if objFSO.fileexists(Server.MapPath(a)) then  
objFSO.deletefile Server.MapPath(a),true  
end if  
db.execute("delete from lh where id="&Cint(X_id))  
response.Redirect("../picup/pic-up2.asp")
    %>
运行结果是
图片附件: 游客没有浏览图片的权限,请 登录注册
红色字体就是第十一行 我数据库可有这字段
图片附件: 游客没有浏览图片的权限,请 登录注册

请问哪儿错了
搜索更多相关主题的帖子: 赋值 
2010-11-25 13:45
dzt0001
Rank: 13Rank: 13Rank: 13Rank: 13
等 级:蒙面侠
威 望:5
帖 子:1281
专家分:4998
注 册:2005-10-12
收藏
得分:0 
set rs=db.Execute(Sql)

----我怎能在别人的苦难面前转过脸去----
2010-11-25 13:58
kevinxu0638
Rank: 2
来 自:江苏
等 级:论坛游民
帖 子:147
专家分:62
注 册:2009-10-19
收藏
得分:0 
谢谢dzt0001

javascript、asp学习研究中 希望高手多多指教
2010-11-25 14:13
快速回复:读取赋值问题
数据加载中...
 
   



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

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