 |
 |
欢迎您！ [最上] [最下] |  |
2012-11-28 11:13:53 游仙
兄弟 请问
ClassID=“当前的CLASSID值”
应该怎么表示
2012-11-28 11:14:55 网站帮忙2
什么叫当前的CLASSID的值
2012-11-28 11:15:04 网站帮忙2
今晚说吧，反正你的是个人网站
2012-11-28 11:15:11 网站帮忙2
现在在上班，刚好有点忙
2012-11-28 11:15:17 游仙
呵呵好的 没事 你先忙
2012-11-29 9:11:07 游仙
来了 兄弟
2012-11-29 9:13:17 网站帮忙2
现在没空呀，得晚上才有空
2012-11-29 9:13:21 网站帮忙2
现在上班呢
2012-11-29 9:13:49 游仙
呵呵好的 没事 那你先忙吧
2012-11-29 9:15:23 网站帮忙2
应该是差不多了，你看下if下面那两句SQL，应该是考虑少了条件
2012-11-29 9:16:20 游仙
好的 我想应该也只有不大的问题了 那我想琢磨琢磨 如果不行 晚上再麻烦你吧
2012-11-29 9:18:57 游仙
m=Request.Form("recordId2")这个是不是表示我们输入表单里的数值
2012-11-29 9:21:47 网站帮忙2
不是，这个是你改变之前的id2
2012-11-29 9:22:07 网站帮忙2
recordid是你的ID，这个是不变的
2012-11-29 9:22:18 网站帮忙2
另外一个就是你想改变的ID2
2012-11-29 9:22:27 网站帮忙2
怎么你好像不用上班的
2012-11-29 9:22:52 游仙
呵呵我现在就在公司 但是早上不忙 我先做自己的事情
2012-11-29 9:23:10 游仙
理解得差不多了 我再研究研究
2012-11-29 9:25:26 游仙
你说的我想改变的ID2是不是这个Request.Form("textfield2")
2012-11-29 9:25:49 网站帮忙2
恩，没错
2012-11-29 9:26:07 游仙
[表情]好的
2012-11-29 12:38:32 游仙
兄弟 这个语句我改成这样了 现在基本实现了 但是这个语句会让textfield2也加1 你看怎么办
xx.CommandText = "update articles set id2 = id2+1 where (id2 >= ?) and id2 < " & m & " and classid=" & Request.Form("classid")
2012-11-29 12:39:30 游仙
比如本来是这样[图片] 我把4改成1后就变成[图片]
2012-11-29 12:47:19 网站帮忙2
昨天我写的语句，里面有一个条件，and id<>原来的ID
2012-11-29 12:48:59 游仙
那个是修改所以不等于该ID的数值 所以我改成了
id2 < " & m & "
而这里的m=Request.Form("recordId2")
2012-11-29 12:49:42 游仙
那个是修改所有不等于该ID的数值 所以我改成了
id2 < " & m & "
而这里的m=Request.Form("recordId2")
2012-11-29 12:50:19 网站帮忙2
xx.CommandText = "update articles set id2 = id2+1 where (id2 >= ?) and id2 < " & m & " and classid=" & Request.Form("classid")
2012-11-29 12:50:27 网站帮忙2
你这句后面再加个条件就行了
2012-11-29 12:50:35 游仙
好的 我看看
2012-11-29 12:50:59 网站帮忙2
xx.CommandText = "update articles set id2 = id2+1 where (id2 >= ?) and id2 < " & m & " and classid=" & Request.Form("classid")
& "and id<>接收ID的值"
2012-11-29 12:51:02 网站帮忙2
改成这样
2012-11-29 12:52:50 游仙
啊？你有修改了吗 怎么跟我发的一样
2012-11-29 12:53:45 游仙
Dim xx
Set xx = Server.CreateObject("ADODB.Command")
xx.ActiveConnection = string
xx.CommandText = "update articles set id2 = ? where ID = ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Parameters.Append xx.CreateParameter("param2", 5, 1, -1, mm(Request.Form("recordId"),Request.Form("recordId"), null))
xx.Execute
if m>n then
xx.CommandText = "update articles set id2 = ? where ID = ? and set id2 = id2+1 where (id2 >= ?) and id2 < " & m & " and classid=" & Request.Form("classid")
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Execute
elseif m<n then
xx.CommandText = "update articles set id2 = id2-1 where (id2 < " & n & " or id2 = " & n & ") and id > " & m & " and classid=" & Request.Form("classid")
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, m)
xx.Execute
end if
xx.ActiveConnection.Close
End If
2012-11-29 12:53:51 游仙
我现在的代码是这样的
2012-11-29 12:55:36 游仙
发错了 现在是这样的
If (CStr(Request("update2")) = "form1") Then
dim m,n
m=Request.Form("recordId2")
n=Request.Form("textfield2")
Dim xx
Set xx = Server.CreateObject("ADODB.Command")
xx.ActiveConnection = string
xx.CommandText = "update articles set id2 = ? where ID = ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Parameters.Append xx.CreateParameter("param2", 5, 1, -1, mm(Request.Form("recordId"),Request.Form("recordId"), null))
xx.Execute
if m>n then
xx.CommandText = "update articles set id2 = id2+1 where (id2 >= ?) and id2 < " & m & " and classid=" & Request.Form("classid")
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Execute
elseif m<n then
xx.CommandText = "update articles set id2 = id2-1 where (id2 < " & n & " or id2 = " & n & ") and id > " & m & " and classid=" & Request.Form("classid")
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, m)
xx.Execute
end if
xx.ActiveConnection.Close
End If
2012-11-29 13:03:50 游仙
呵呵我糊涂 后面还跟了个 & "and id<>接收ID的值"
我再试试
2012-11-29 13:04:09 网站帮忙2
恩，我现在有点事做
2012-11-29 13:04:16 网站帮忙2
要是不行的话，今晚再帮你弄
2012-11-29 13:04:37 网站帮忙2
and id<>接收ID的值"
2012-11-29 13:04:48 游仙
好的 我先试试 不会的话晚上再请教你 你忙吧 呵呵 谢谢你
2012-11-29 13:05:20 网站帮忙2
这个条件一定要的，因为你刚修改的那个ID，它的ID2已经有改过了
2012-11-29 13:05:52 游仙
呵呵 是的 我现在知道了 我试试
2012-11-29 13:09:24 游仙
[表情]兄弟 现在终于可以了 呵呵 太好了
2012-11-29 13:09:40 网站帮忙2
恩
2012-11-29 13:09:44 网站帮忙2
可以就好
2012-11-29 13:09:46 游仙
我加了个and id <> ?
2012-11-29 13:09:54 网站帮忙2
恩
2012-11-29 13:10:16 网站帮忙2
你有没有学过JS
2012-11-29 13:11:14 游仙
呵呵 真是谢谢你。。很热心的兄弟 以后你有需要我也帮你我也帮你 我是做设计的。。有空你去我空间看看 有很多我的作品 呵呵JS我没学过 我只是会运用一些特效
2012-11-29 13:11:34 网站帮忙2
恩，那我先谢了
2012-11-29 13:12:28 游仙
恩呵呵 好的。。那你先忙吧 以后有需要咱们相互帮忙。
2012-11-29 13:51:32 游仙
兄弟 ID2从大改成小现在没有问题了 可从小改成大却为什么还是不行呢
你看这个顺序[图片]我把1改成4后是变成[图片]这是什么问题呢
2012-11-29 13:51:47 游仙
代码是这样的
elseif m<n then
xx.CommandText = "update articles set id2 = id2-1 where (id2 =< ?) and id2 > " & m & " and classid=" & Request.Form ("classid") & " and id <> ?"
2012-11-29 13:53:49 网站帮忙2
你的参数是什么
2012-11-29 13:53:55 网站帮忙2
会不会是参数弄错了
2012-11-29 13:53:59 游仙
dim m,n
m=Request.Form("recordId2")
n=Request.Form("textfield2")
2012-11-29 13:54:10 游仙
我上面定义了这两个
2012-11-29 13:56:59 游仙
不对 错误是这一个
Microsoft JET Database Engine '80040e14'
语法错误 (操作符丢失) 在查询表达式 '(id2 =< ?) and id2 > 1 and classid=11 and id <> ?' 中。
2012-11-29 13:59:01 网站帮忙2
什么时候开始报错的
2012-11-29 14:00:30 游仙
改成这样以后它就报错了
Dim xx
Set xx = Server.CreateObject("ADODB.Command")
xx.ActiveConnection = string
xx.CommandText = "update articles set id2 = ? where ID = ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Parameters.Append xx.CreateParameter("param2", 5, 1, -1, mm(Request.Form("recordId"),Request.Form("recordId"), null))
xx.Execute
if m>n then
xx.CommandText = "update articles set id2 = id2+1 where (id2 >= ?) and id2 < " & m & " and classid=" & Request.Form ("classid") & " and id <> ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Execute
elseif m<n then
xx.CommandText = "update articles set id2 = id2-1 where (id2 =< ?) and id2 > " & m & " and classid=" & Request.Form ("classid") & " and id <> ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, m)
xx.Execute
end if
xx.ActiveConnection.Close
2012-11-29 14:01:37 网站帮忙2
晚上弄吧，现在还有事没做完
2012-11-29 14:02:02 游仙
呵呵 好的 那你先忙吧
2012-11-29 14:19:18 游仙
好了 兄弟 大公告成 现在没问题了 晚上不用再麻烦你了 真是谢谢你 呵呵
2012-11-29 14:20:05 网站帮忙2
恩
2012-11-29 14:20:13 网站帮忙2
是SQL条件写错了吧
2012-11-29 14:21:25 游仙
是的 我 把=<改成<=就好了 呵呵
2012-11-29 14:21:48 网站帮忙2
呵呵
2012-11-29 14:22:18 游仙
[表情]好了 兄弟 耽误你不少时间了 那你忙吧
2012-12-07 14:44:17 游仙
兄弟 我后台现在相同位数的序号之间可以调整顺序 比如
1 A
2 B
3 C
4 D
5 E
如果把5调到第2个 则变成
1 A
2 E
3 B
4 C
5 D
但是如果是在不同位数的序号之间调整顺序的话 比如
8 A
9 B
10 C
11 D
12 E
如果把12调到第9个 则变成
8 A
9 E
9 B
10 C
11 D
这时BCD的序号并没有加1，你说这是怎么回事
2012-12-07 14:45:57 网站帮忙2
看下你的SQL语句
2012-12-07 14:46:52 游仙
在吗 看得明白我的意思吗
2012-12-07 14:46:59 游仙
好的
2012-12-07 14:47:35 游仙
就是上次发给你的这一个
2012-12-07 14:47:36 游仙
If (CStr(Request("update2")) = "form1") Then
dim m,n
m=Request.Form("recordId2")
n=Request.Form("textfield2")
Dim xx
Set xx = Server.CreateObject("ADODB.Command")
xx.ActiveConnection = string
xx.CommandText = "update articles set id2 = ? where ID = ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Parameters.Append xx.CreateParameter("param2", 5, 1, -1, mm(Request.Form("recordId"),Request.Form("recordId"), null))
xx.Execute
if n="0" then
xx.CommandText = "update articles set id2 = id2-1 where id2 > " & m & " and classid=" & Request.Form("classid")
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Execute
elseif m>n then
xx.CommandText = "update articles set id2 = id2+1 where id2 >= ? and id2 < " & m & " and id2 >0 and classid=" & Request.Form("classid") & " and id <> ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, Request.Form("textfield2"))
xx.Execute
elseif m<n and m<>"0" then
xx.CommandText = "update articles set id2 = id2-1 where id2 <= ? and id2 > " & m & " and id2 >0 and classid=" & Request.Form("classid") & " and id <> ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, m)
xx.Execute
elseif m="0" then
xx.CommandText = "update articles set id2 = id2+1 where id2 >= ? and classid=" & Request.Form("classid") & " and id <> ?"
xx.Prepared = true
xx.Parameters.Append xx.CreateParameter("param1", 202, 1, 50, m)
xx.Execute
end if
xx.ActiveConnection.Close
End If
2012-12-07 14:50:58 网站帮忙2
[图片]
2012-12-07 14:51:11 网站帮忙2
你在所有执行前面，试下能不能把语句打印出来
2012-12-07 14:51:19 网站帮忙2
看都执行了哪些语句
2012-12-07 14:51:48 游仙
我试试
2012-12-07 14:54:13 游仙
update articles set id2 = id2+1 where id2 >= ? and id2 < 2 and id2 >0 and classid=33 and id <> ?
2012-12-07 14:54:22 游仙
显示出这个
2012-12-07 14:55:28 网站帮忙2
等等
2012-12-07 14:55:37 游仙
好的
2012-12-07 14:59:25 网站帮忙2
应该不止一句吧
2012-12-07 14:59:35 网站帮忙2
你得在全部执行前打印
2012-12-07 14:59:44 网站帮忙2
看总共都执行了什么
2012-12-07 14:59:53 游仙
好的 等等
2012-12-07 15:01:37 网站帮忙2
等等
2012-12-07 15:01:41 游仙
我都加了 都显示出这一句
2012-12-07 15:01:45 游仙
恩
2012-12-07 15:01:45 网站帮忙2
主管来了
2012-12-07 15:02:02 游仙
好的 那你先忙吧
2012-12-07 15:04:12 网站帮忙2
你是把哪个序号调到哪个序号
2012-12-07 15:07:53 游仙
我的意思是说 在相同位数的序号之间调节很正常 比如从85调到同样是两位数的25 那么26 27 28。。。会自动加1 没有问题，但如果从85调到一位数的5 则6 7 8 9。。。以至到84都不能自动加1，，这是怎么回事
2012-12-07 15:08:49 游仙
结果会显示成
1 2 3 4 5 5 6 7 8 9。。。
2012-12-07 15:08:54 游仙
5会重复
2012-12-07 15:32:28 网站帮忙2
[图片]
2012-12-07 15:32:46 网站帮忙2
我的意思是，你打这个语句的时候，是把哪个序号调到哪个序号的位置
2012-12-07 15:33:36 游仙
我是把2调到12
2012-12-07 15:35:12 网站帮忙2
那出现的是什么？
1,2,2,3,4,...?
2012-12-07 15:35:44 游仙
什么也没出现 就出现了那行字
2012-12-07 15:35:59 游仙
顺序也都没变
2012-12-07 15:36:28 网站帮忙2
你把它end了
2012-12-07 15:36:35 网站帮忙2
不要打response.end
2012-12-07 15:36:46 网站帮忙2
让它一直执行，才能出现全部语句
2012-12-07 15:37:16 游仙
我里面都没有response.end呀
2012-12-07 15:37:18 网站帮忙2
这种问题比较奇怪，我能想到的就是拿一个具体的例子来分析，看是什么样的情况出错了
2012-12-07 15:37:48 游仙
等等 我把文件发给你好吗 你帮忙看看
2012-12-07 15:37:49 网站帮忙2
[图片]
2012-12-07 15:37:53 网站帮忙2
这里很奇怪
2012-12-07 15:37:58 网站帮忙2
你是不是近期改动过
2012-12-07 15:39:02 游仙
恩 我也说不清楚近期我有改过 你给我发的那段代码 还没完全达到我要的效果 现在我改得差不多了 就差不同位数间的序号不能正常调节了
2012-12-07 15:42:15 网站帮忙2
[图片]
2012-12-07 15:42:22 网站帮忙2
你先把这里改一下吧
2012-12-07 15:42:31 网站帮忙2
id2< 然后还id2>
2012-12-07 15:42:36 网站帮忙2
这里应该有问题的
2012-12-07 15:43:01 游仙
呵呵 我改了一天都不知道怎么弄 我发给你 你帮我看一看
2012-12-07 15:43:04 网站帮忙2
还有最好别又用拼接，又用参数的，统一一下吧，不然看起来也乱
2012-12-07 15:43:21 游仙
好的
2012-12-07 15:43:22 网站帮忙2
现在上班，一小会一小会就有点事，不一定能帮你弄的
2012-12-07 15:43:47
[图片]15:43:47
成功发送文件“main.rar”(2.27MB)
打开文件 打开所在文件夹
2012-12-07 15:43:54 游仙
好的 呵呵没事 有空了就帮我看看 不然我会研究个半死
2012-12-07 15:44:10 游仙
后台拥护名是0密码也是0
2012-12-07 15:44:28 网站帮忙2
回去这几天也比较忙，在弄那个淘宝店，赶双十二的活动
2012-12-07 15:45:02 游仙
没事 有空了再看看 我自己一边也在想办法
2012-12-07 15:45:09 网站帮忙2
这是在哪个文件的
2012-12-07 15:45:46 游仙
这个是主要源码，后台在这里登陆http://localhost/main/admin/login.asp?id=2
2012-12-07 15:51:38 网站帮忙2
我现在填离职表
2012-12-07 15:52:14 游仙
啊？不做了？兄弟
2012-12-07 15:52:28 网站帮忙2
恩
2012-12-07 15:52:50 游仙
呵呵 有更好的去处了还是？
2012-12-07 16:08:04 网站帮忙2
没
2012-12-07 16:08:09 网站帮忙2
还没投简历，呵呵
2012-12-07 16:08:51 游仙
恩呵呵 没关系 有能力还怕什么，早晚会遇到好的公司
2012-12-07 16:09:14 网站帮忙2
我这段时间不想找工作
2012-12-07 16:09:24 网站帮忙2
想试下和朋友开网店
2012-12-07 16:09:37 网站帮忙2
如果实在不行，下一年没生活费再找
2012-12-07 16:10:41 游仙
呵呵那好啊 多尝试一下未尝不好。。我从毕业到现在也都换了有几十分工作了
2012-12-07 16:11:10 游仙
最少三十份呵呵 你都不敢想象
2012-12-07 16:13:24 网站帮忙2
那你面试的时候，人事的人有没有问你
2012-12-07 16:13:29 网站帮忙2
怎么总辞职
2012-12-07 16:13:36 网站帮忙2
很多公司怕这样的人的
2012-12-07 16:13:55 网站帮忙2
你把压缩包发邮件给我吧
2012-12-07 16:14:04 网站帮忙2
我这里没asp的环境
2012-12-07 16:14:10 网站帮忙2
上传不太方便
2012-12-07 16:14:24 游仙
我不告诉他们 他们怎么知道呵呵 我是为了学本事 所以一发现这份工作学不到东西我就走了 这对自己有好处
2012-12-07 16:14:58 游仙
是我刚才给你发的那份后台源文件是吗
2012-12-07 16:15:57 网站帮忙2
恩
2012-12-07 16:16:02 网站帮忙2
我这里上传东西不方便
2012-12-07 16:16:37 游仙
好的
2012-12-07 16:17:53 网站帮忙2
他们没问你这段时间都干什么了吗
2012-12-07 16:19:01 游仙
我做3D的 6个小时的工作 一个小时内就做完了 剩下的当然由我自己支配了 谁也管不了 呵呵 如果没我做的话他们都招不到人
2012-12-07 16:20:54 网站帮忙2
不是，我是说你面试的时候
2012-12-07 16:21:04 网站帮忙2
还是你骗他们说，在一家公司待了很久
2012-12-07 16:22:05 游仙
呵呵，刚毕业前5年我是老换工作，但是这几年没有了 这几年能力提高了 我都在比较大的公司里工作 会比较如意一些 所以不用老换
2012-12-07 16:23:04 游仙
连天红听说过吗 我在里面呆了两年以后很多公司都很欢迎我了 待遇谈得都比较高呵呵
2012-12-07 16:24:18 网站帮忙2
呵呵，要我找工作，我倒不想隐瞒什么，换就换，反正也没什么大不了
2012-12-07 16:25:20 网站帮忙2
我找工作的原则是：在职时我会尽力做好，但我不会承诺一直留在那里
2012-12-07 16:25:33 网站帮忙2
当然走的时候，我也会尽量交接好工作
2012-12-07 16:26:26 游仙
是啊 换工作是很正常的事 不如意了还呆着干什么，
2012-12-07 16:27:16 网站帮忙2
也不算不如意。反正打工都那样，但工作一直相处的人，都对我很好。以前自己的经理，现在其他部门一个主管
2012-12-07 16:27:27 网站帮忙2
所以有时候要走也好难开口
2012-12-07 16:28:15 游仙
呵呵 呆久了都会有感情的，但是考虑到前途 有时候也不能不舍得
2012-12-07 16:28:14 网站帮忙2
先不说了，现在有事忙。你那个网站，可能得晚点才能帮你试下了。这两个星期会比较忙
2012-12-07 16:28:55 游仙
呵呵好的 没事 你先忙自己的，，先谢谢你了 网络里很难碰到热心的兄弟了 以后有需要相互帮忙呵呵
2012-12-07 16:29:21 网站帮忙2
恩
2012-12-07 16:29:31 游仙
给你发过去了
2012-12-07 16:29:37 网站帮忙2
恩，有收到了
2012-12-07 16:29:43 游仙
好的
2012-12-07 16:30:11 网站帮忙2
有时候这种思维不会很难的，你找个具体的实例，看它的序号都是怎么变化的
2012-12-07 16:30:16 网站帮忙2
可能就能找到问题了
2012-12-07 16:31:09 游仙
好的，我自己花了点时间想现在也解决得差不多了 呵呵 到时候如果找到解决的办法了就不用麻烦你了
2012-12-07 16:48:47 网站帮忙2
没事，不用说麻烦
2012-12-07 16:50:14 游仙
[表情]呵呵好的
2012-12-10 9:20:56 游仙
兄弟有空吗 帮我看看这个代码语法有没有错
2012-12-10 9:21:06 网站帮忙2
发来
2012-12-10 9:21:10 游仙
'删除
Public Sub Del(Id)
If Id <> "" Then
Sql1 = "update articles set IsDelete=1 where Id in(" & Id & ")"
Sql2 = "update articles set id2 = id2-1 where Id2 >" & Id2 & " and ClassID = " & ClassID
Conn.Execute Sql1,Sql2
End If
End Sub
2012-12-10 9:21:36 网站帮忙2
你要删除？
2012-12-10 9:21:54 游仙
我想在删除文章的同时 其后的文章的排序自动减少1 这样就能保证排序不间断了
2012-12-10 9:22:09 网站帮忙2
那现在出现什么问题
2012-12-10 9:23:08 网站帮忙2
第二句有问题
2012-12-10 9:23:15 网站帮忙2
你没传ID2
2012-12-10 9:23:38 游仙
现在后面的ID2并没有减1
2012-12-10 9:23:45 游仙
要怎么传呢
2012-12-10 9:23:47 网站帮忙2
WHERE应该是ID> ID
2012-12-10 9:23:59 网站帮忙2
不用传ID2
2012-12-10 9:24:06 网站帮忙2
WHERE 后面写错了
2012-12-10 9:24:36 游仙
可我要减1的是大于被删除ID2后面的ID2
2012-12-10 9:25:13 网站帮忙2
Public Sub Del(Id,ID2)
2012-12-10 9:25:16 网站帮忙2
试下这样
2012-12-10 9:25:29 网站帮忙2
ID2传进来的时候，用你删除的ID2
2012-12-10 9:25:37 游仙
好的
2012-12-10 9:26:23 游仙
ClassID要不要也传近来
2012-12-10 9:26:57 游仙
错误的参数个数或无效的参数属性值: 'Del'
2012-12-10 9:26:59 网站帮忙2
用到的就要
2012-12-10 9:27:18 网站帮忙2
你调用的时候，没给它正确的参数
2012-12-10 9:27:33 网站帮忙2
你发整个页面的代码来吧
2012-12-10 9:27:47 游仙
好的呵呵
2012-12-10 9:28:27
[图片]9:28:27
成功发送文件“Article.asp”(7.00KB)
打开文件 打开所在文件夹
2012-12-10 9:29:59 网站帮忙2
你调用这个函数的页面
2012-12-10 9:30:06 网站帮忙2
不是这个页面
2012-12-10 9:30:35 游仙
那是这个
2012-12-10 9:30:37
[图片]9:30:37
成功发送文件“Article_List.asp”(15.00KB)
打开文件 打开所在文件夹
2012-12-10 9:30:53 网站帮忙2
还有你这样做的话，你排序得加个条件
2012-12-10 9:30:57 网站帮忙2
isdelete=0
2012-12-10 9:31:01 网站帮忙2
不然以后会乱的
2012-12-10 9:31:07 游仙
恩呵呵老板叫 我先走开一会
2012-12-10 9:31:47 网站帮忙2
[图片]
2012-12-10 9:32:01 网站帮忙2
这种地方，你都得把参数传进去
2012-12-10 10:15:13 游仙
Article_List.asp里那段代码现在我改成这样了
Case "del"
Call Article.Del(Lid,id2,ClassID)
Set Article = Nothing
Call AdminActionLog("删除ID为" & Lid &"的页面")
response.redirect(request.ServerVariables("HTTP_REFERER"))
Article.asp文件里我改成这样了
'删除
Public Sub Del(Id,id2,ClassID)
If Id <> "" Then
Sql1 = "update articles set IsDelete=1 where Id in(" & Id & ")"
Sql2 = "update articles set id2 = id2-1 where Id2 >" & Id2 & " and ClassID = " & ClassID & " and isdelete=0"
Conn.Execute Sql1,Sql2
End If
End Sub
可怎么还是不能自动减1呢
2012-12-10 10:18:12 网站帮忙2
你调用的页面没id2
2012-12-10 10:18:18 网站帮忙2
你没提交给它
2012-12-10 10:18:43 网站帮忙2
[图片]
2012-12-10 10:18:54 网站帮忙2
你改了这里，但在它之前并没有id2
2012-12-10 10:19:31 游仙
啊 对 我必须加一个id2 = Request.QueryString("id2")吗
2012-12-10 10:21:22 网站帮忙2
恩
2012-12-10 10:21:53 网站帮忙2
但你删除的操作页面，也必须要有一个name=id2的
2012-12-10 10:23:10 游仙
是说Article.asp页面吗
2012-12-10 10:23:19 网站帮忙2
不是
2012-12-10 10:23:24 网站帮忙2
是在HTML代码里的
2012-12-10 10:23:45 游仙
那是Article_List.asp吗
2012-12-10 10:24:32 网站帮忙2
[图片]
2012-12-10 10:24:39 网站帮忙2
你的删除是写在这里吧
2012-12-10 10:24:58 游仙
是的
2012-12-10 10:27:32 网站帮忙2
等等，我看下你的页面是怎么写的
2012-12-10 10:27:39 游仙
好的
2012-12-10 10:30:24 网站帮忙2
[图片]
2012-12-10 10:30:38 网站帮忙2
你在这里，试下能不能获取到ID2和CLASSID
2012-12-10 10:31:01 游仙
好的
2012-12-10 10:31:09 网站帮忙2
ID2=Trim(Request.Form("Id2"))
CLASSID=Trim(Request.Form("CLASSID"))
2012-12-10 10:31:16 网站帮忙2
加在LID那行下面
2012-12-10 10:32:18 游仙
Case "del"
Call Article.Del(Lid,id2,ClassID)
ID2=Trim(Request.Form("Id2"))
CLASSID=Trim(Request.Form("CLASSID"))
Set Article = Nothing
Call AdminActionLog("删除ID为" & Lid &"的页面")
response.redirect(request.ServerVariables("HTTP_REFERER"))
2012-12-10 10:32:20 游仙
这样吗
2012-12-10 10:32:35 网站帮忙2
恩
2012-12-10 10:32:48 游仙
试验一下
2012-12-10 10:32:56 网站帮忙2
等等
2012-12-10 10:33:00 游仙
恩
2012-12-10 10:33:08 网站帮忙2
不是这个
2012-12-10 10:33:14 游仙
恩
2012-12-10 10:33:40 网站帮忙2
22行那里的
2012-12-10 10:34:27 游仙
Lid = Trim(Request.Form("Id"))
ID2=Trim(Request.Form("Id2"))
CLASSID=Trim(Request.Form("CLASSID"))这样是吗
2012-12-10 10:35:20 网站帮忙2
[图片]
2012-12-10 10:35:38 网站帮忙2
是的，但下面接下来是调用，不是set article=nothing
2012-12-10 10:37:48 游仙
那应该怎么改呢
2012-12-10 10:38:09 网站帮忙2
改22行的就是啦
2012-12-10 10:38:24 游仙
这片代码我改成这样了
Lid = Trim(Request.Form("Id"))
ID2=Trim(Request.Form("Id2"))
CLASSID=Trim(Request.Form("CLASSID"))
Select Case CmdTmp(0)
Case "del"
Call Article.Del(Lid,id2,ClassID)
Set Article = Nothing
Call AdminActionLog("删除ID为" & Lid &"的页面")
response.redirect(request.ServerVariables("HTTP_REFERER"))
2012-12-10 10:38:29 网站帮忙2
哦，抱歉，是我看错了
2012-12-10 10:38:35 网站帮忙2
就是你改的那里
2012-12-10 10:38:52 网站帮忙2
是我刚才看错了
2012-12-10 10:38:53 游仙
呵呵 那我现在改成这样了 你看哪里还有问题
2012-12-10 10:39:08 网站帮忙2
可以试一下了
2012-12-10 10:39:36 游仙
可还是没有减1啊
2012-12-10 10:39:52 网站帮忙2
有没有报错
2012-12-10 10:39:59 游仙
没有报错
2012-12-10 10:40:48 网站帮忙2
response.write sql1 & "<br />"
response.write sql2 & "<br />"
response.end
2012-12-10 10:40:52 游仙
就只是删了而已
2012-12-10 10:40:54 网站帮忙2
[图片]
2012-12-10 10:41:00 网站帮忙2
打印出来看看
2012-12-10 10:41:07 游仙
恩
2012-12-10 10:42:11 游仙
update articles set IsDelete=1 where Id in(436)
update articles set id2 = id2-1 where Id2 > and ClassID = and isdelete=0
2012-12-10 10:42:16 游仙
打印出来了
2012-12-10 10:42:46 网站帮忙2
ID2>还没获取到
2012-12-10 10:42:51 网站帮忙2
classid也一样
2012-12-10 10:43:05 游仙
恩 呵呵那是怎么回事
2012-12-10 10:43:14 网站帮忙2
你改完的页面再发给我一下
2012-12-10 10:43:19 游仙
好的
2012-12-10 10:43:56 网站帮忙2
两个都发
2012-12-10 10:44:00
[图片]10:44:00
成功发送文件“Article_List.asp”(15.00KB)
打开文件 打开所在文件夹
2012-12-10 10:44:01 游仙
恩
2012-12-10 10:44:41
[图片]10:44:41
成功发送文件“Article.asp”(7.00KB)
打开文件 打开所在文件夹
2012-12-10 10:48:33
[图片]10:48:33
对方取消了“Article_List.asp”(15.00KB)的发送。
2012-12-10 10:48:35
[图片]10:48:35
对方取消了“Article.asp”(7.00KB)的发送。
2012-12-10 10:48:47
[图片]10:48:47
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 10:50:08 游仙
Article.asp这个不用改是吗
2012-12-10 10:50:29 网站帮忙2
不用
2012-12-10 10:50:32 网站帮忙2
先试一下
2012-12-10 10:50:34 游仙
恩
2012-12-10 10:51:13 游仙
我删 了ID670的文章后 显示“670------”
2012-12-10 10:51:25 游仙
但文章并没有删掉
2012-12-10 10:51:44 网站帮忙2
知道，我让我停止了
2012-12-10 10:52:07 网站帮忙2
如果能正常删除，后面应该是670--id2--classid
2012-12-10 10:52:12 网站帮忙2
我再看一下
2012-12-10 10:52:19 游仙
恩
2012-12-10 11:01:07 网站帮忙2
先别点删除
2012-12-10 11:01:42
[图片]11:01:42
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 11:02:24 游仙
Microsoft VBScript 编译器错误 '800a0401'
语句未结束
\游仙阁\main\admin\Article_List.asp, line 303
2012-12-10 11:03:34 游仙
现在一打开就出现这个错了
2012-12-10 11:04:18
[图片]11:04:18
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 11:04:48 游仙
[图片]
2012-12-10 11:04:54 游仙
一打开就这样了
2012-12-10 11:05:34 网站帮忙2
[图片]
2012-12-10 11:05:40 网站帮忙2
单词写错了
2012-12-10 11:05:42 网站帮忙2
你改一下
2012-12-10 11:05:45 网站帮忙2
write
2012-12-10 11:06:14 游仙
啊 呵呵是啊
2012-12-10 11:06:43 游仙
[图片]
2012-12-10 11:06:46 游仙
现在是这样
2012-12-10 11:14:34 游仙
我Article.asp这个页面里的代码那样写没有错吧？
2012-12-10 11:14:48 网站帮忙2
没
2012-12-10 11:15:02 网站帮忙2
是这里点击删除没有获取到ID2和CLASSID
2012-12-10 11:15:16 网站帮忙2
我在找你是怎么获取其他的
2012-12-10 11:15:26 游仙
呵呵 可刚才不是被你打印出来了吗
2012-12-10 11:15:38 游仙
好的 辛苦你了
2012-12-10 11:15:42 网站帮忙2
[图片]
2012-12-10 11:15:50 网站帮忙2
把刚刚这里打印的东西删除了
2012-12-10 11:16:01 网站帮忙2
运行完截个完整的页面我看下
2012-12-10 11:16:14 游仙
好的
2012-12-10 11:17:12 游仙
删了以后再删除就出现这个了
2012-12-10 11:17:15 游仙
670------
2012-12-10 11:17:39 网站帮忙2
不是，你的界面
2012-12-10 11:17:44 网站帮忙2
没点删除之前
2012-12-10 11:17:57 游仙
[图片]
2012-12-10 11:18:00 游仙
这样的
2012-12-10 11:18:30 游仙
显示排序次数以后是这样的
2012-12-10 11:18:39 游仙
[图片]
2012-12-10 11:22:47 网站帮忙2
你右键，查看源码，把生成的静态网页也发给我一下
2012-12-10 11:23:08 游仙
好的
2012-12-10 11:24:20
[图片]11:24:20
成功发送文件“Article_List.txt”(32.00KB)
打开文件 打开所在文件夹
2012-12-10 11:25:31 网站帮忙2
这次要点删除
2012-12-10 11:25:36
[图片]11:25:36
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 11:25:40 游仙
好的
2012-12-10 11:26:23 游仙
[图片]
2012-12-10 11:26:32 游仙
怎么会跑出三个选框
2012-12-10 11:26:49 网站帮忙2
这个没事，你等下
2012-12-10 11:26:49 游仙
点删除以后显示
915------
2012-12-10 11:27:59 游仙
点第二个选框再删除则出现
0------
2012-12-10 11:28:14
[图片]11:28:14
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 11:28:39 游仙
0, 33, 670, 1, 33, 2, 33, 3, 33, 4, 33, 5, 33, 6, 33, 7, 33, 8, 33, 9, 33, 10, 33, 11, 33, 12, 33, 13, 33, 14, 33, 15, 33, 16, 33, 17, 33, 18, 33, 19, 33------
2012-12-10 11:28:43 游仙
现在显示这个
2012-12-10 11:29:01 游仙
我删一篇它就显示这么多
2012-12-10 11:29:29 网站帮忙2
等下吧，我看下你发的静态页面
2012-12-10 11:29:33 网站帮忙2
这样很不好调试
2012-12-10 11:29:34 游仙
恩
2012-12-10 11:29:47 游仙
呵呵 辛苦你了兄弟
2012-12-10 11:30:23 网站帮忙2
你平时应该多写点注释，不然别人很难弄清楚，你哪些变量是用来干嘛的
2012-12-10 11:31:07 游仙
呵呵 我是拿源码来改的 所以大部分是它原来的代码 所以没有太多注释
2012-12-10 11:31:45 游仙
只能辛苦兄弟你了
2012-12-10 11:33:46 网站帮忙2
再试一下
2012-12-10 11:35:23
[图片]11:35:23
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 11:35:25 游仙
好的
2012-12-10 11:35:51 游仙
0, 33, 670, 1, 33, 2, 33, 3, 33, 4, 33, 5, 33, 6, 33, 7, 33, 8, 33, 9, 33, 10, 33, 11, 33, 12, 33, 13, 33, 14, 33, 15, 33, 16, 33, 17, 33, 18, 33, 19, 33------
2012-12-10 11:35:58 游仙
也是这样
2012-12-10 11:36:11 网站帮忙2
不是吧
2012-12-10 11:36:21 网站帮忙2
那你再发一下静态页面的代码
2012-12-10 11:36:28 游仙
好的
2012-12-10 11:36:31 网站帮忙2
右键，查看源码那个地方
2012-12-10 11:36:37 游仙
知道
2012-12-10 11:37:25
[图片]11:37:25
成功发送文件“Article_List[1].txt”(34.00KB)
打开文件 打开所在文件夹
2012-12-10 11:39:17
[图片]11:39:17
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 11:39:35 游仙
670---1---33
2012-12-10 11:39:42 游仙
就显示这个
2012-12-10 11:39:53 网站帮忙2
这样就对了
2012-12-10 11:40:14 网站帮忙2
你看下数据库，是不是ID=670的记录，ID2=1，CLASSID=33
2012-12-10 11:40:22 网站帮忙2
是的话就对了
2012-12-10 11:40:22 游仙
呵呵 就快出来了吗
2012-12-10 11:40:41 游仙
是的 呵呵
2012-12-10 11:41:07 网站帮忙2
[图片]
2012-12-10 11:41:17 网站帮忙2
把27 28这两行删除了
2012-12-10 11:43:43 游仙
删了 但是后面的ID2仍然没有减1
2012-12-10 11:44:13 网站帮忙2
现在改article了
2012-12-10 11:44:23 游仙
好的
2012-12-10 11:44:48 网站帮忙2
[图片]
2012-12-10 11:44:53 网站帮忙2
response.write sql1 & "<br />" & sql2
response.end
2012-12-10 11:46:32 游仙
加了 什么都没反应 也没打印出什么
2012-12-10 11:48:03
[图片]11:48:03
成功接收文件“Article.asp”
打开文件 打开所在文件夹
2012-12-10 11:48:33 游仙
update articles set IsDelete=1 where Id in(674)
update articles set id2 = id2-1 where Id2 >5 and ClassID = 33 and isdelete=0
2012-12-10 11:48:41 游仙
打印出来了
2012-12-10 11:49:08 网站帮忙2
674的ID2是什么
2012-12-10 11:49:26 网站帮忙2
还有CLASSID
2012-12-10 11:49:45 游仙
是5 和33
2012-12-10 11:49:49 游仙
呵呵 没错了
2012-12-10 11:51:14 网站帮忙2
那你到数据库去执行，看能不能正常删除一条记录
2012-12-10 11:51:30 网站帮忙2
ID和ID2和CLASSID要对应的
2012-12-10 11:52:23 游仙
[图片]
2012-12-10 11:52:37 游仙
就是这样一整条删除吗
2012-12-10 11:53:24 网站帮忙2
比如你要删除674
2012-12-10 11:53:31 网站帮忙2
你就执行update articles set IsDelete=1 where Id in(674)
2012-12-10 11:53:41 网站帮忙2
然后再执行update articles set id2 = id2-1 where Id2 >5 and ClassID = 33 and isdelete=0
2012-12-10 11:53:48 网站帮忙2
看是不是有变化了
2012-12-10 11:54:07 网站帮忙2
这个语句看起来没什么问题呀
2012-12-10 11:56:02 游仙
那上面这两应该怎么执行呢
2012-12-10 11:56:33 网站帮忙2
在数据库里执行呀
2012-12-10 11:57:03 游仙
数据库里当然可以删除啊
2012-12-10 11:57:14 游仙
删除了要干什么
2012-12-10 11:57:39 网站帮忙2
因为它现在点删除是执行这两句，但是你说点完没有删除到
2012-12-10 11:57:57 网站帮忙2
所以到数据库执行，看语句是否执行完，能达到你原来想到的效果
2012-12-10 11:58:27 网站帮忙2
如果可以，就说明语句本身没问题，如果不行，就是语句有问题，有问题的话，数据库执行出错也会有提示
2012-12-10 11:58:28 游仙
是啊 很奇怪 。。那数据库里要怎么执行呢 上次你说的我忘了呵呵
2012-12-10 11:59:47 网站帮忙2
我这边现在没ACCESS
2012-12-10 11:59:50 游仙
呵呵 第一次接触这个 所以我没有给记住 上次你说是在哪里执行的
2012-12-10 11:59:57 游仙
远程试试
2012-12-10 12:00:13 网站帮忙2
等一下中午吃完饭吧
2012-12-10 12:00:21 网站帮忙2
我中午吃饭时间只有十二点到一点
2012-12-10 12:00:34 游仙
好的 呵呵那先吃饭去吧 我也下班了
2012-12-10 12:01:15 游仙
好的 那等会再处理吧
2012-12-10 12:01:23 网站帮忙2
恩
2012-12-10 12:31:16 网站帮忙2
可以了
2012-12-10 12:31:27 游仙
[表情]啊太好了
2012-12-10 12:31:35 游仙
你发过来我试试
2012-12-10 12:31:52 网站帮忙2
不是，我的意思是可以开远程了
2012-12-10 12:31:56 网站帮忙2
我这边执行不了
2012-12-10 12:32:00 网站帮忙2
不知道结果的
2012-12-10 12:32:01 游仙
呵呵 好的
2012-12-10 12:33:25 游仙
那你操作吧
2012-12-10 12:34:10 网站帮忙2
我控制不了
2012-12-10 12:36:19 网站帮忙2
你的ACCESS放在哪
2012-12-10 12:39:02 网站帮忙2
你这个没办法执行命令的吗
2012-12-10 12:39:13 游仙
执行什么命令
2012-12-10 12:39:27 网站帮忙2
可能版本太低吧，我也没用过03的
2012-12-10 12:39:35 游仙
我不知道在哪里执行
2012-12-10 12:39:38 网站帮忙2
不管了，我再试下吧
2012-12-10 12:51:02 网站帮忙2
是会改的呀
2012-12-10 12:51:54 游仙
可以吗 我在页面试试
2012-12-10 12:51:59 网站帮忙2
你等下
2012-12-10 12:52:06 网站帮忙2
我在网页帮你试
2012-12-10 13:01:32 游仙
是这个文件吧
是的
已经回变啦
现在都好了是吗
2012-12-10 13:03:41 游仙
啊 是啊 呵呵那在 页面上也可以吗
2012-12-10 13:04:07 游仙
这个就是在页面删的啊
呵呵 那不是实现了吗
2012-12-10 13:05:11 网站帮忙2
那几个一样的，是删除了的
2012-12-10 13:05:15 网站帮忙2
你试一下吧
2012-12-10 13:05:18 网站帮忙2
没什么问题呀
2012-12-10 13:05:18 游仙
好的
2012-12-10 13:05:23 网站帮忙2
ID2会减的
2012-12-10 13:05:29 游仙
呵呵 等等我试试
2012-12-10 13:06:08 网站帮忙2
对了，还有个问题
2012-12-10 13:06:12 网站帮忙2
还不能删除多个
2012-12-10 13:06:15 游仙
是啊
2012-12-10 13:06:17 网站帮忙2
只能一个一个删除
2012-12-10 13:06:22 游仙
那 这么办
2012-12-10 13:06:25 网站帮忙2
接收还没处理好
2012-12-10 13:06:26 游仙
怎么办
2012-12-10 13:06:34 游仙
好的
2012-12-10 13:06:55 网站帮忙2
你先试一个一个的删除，多个一起删除还得改
2012-12-10 13:07:11 游仙
是的 那你一起改一下多个的 呵呵
2012-12-10 13:07:37 游仙
应该跟这个文件有关系笆
2012-12-10 13:07:44 游仙
[图片]
2012-12-10 13:08:12 游仙
[图片]
2012-12-10 13:08:18 网站帮忙2
不是这里的问题
2012-12-10 13:08:29 游仙
那你看是哪里
2012-12-10 13:08:59 网站帮忙2
[图片]
2012-12-10 13:09:05 网站帮忙2
这里是谁帮你们写的
2012-12-10 13:09:13 游仙
呵呵源代码就是这样的
2012-12-10 13:09:25 游仙
我是下载的源码
2012-12-10 13:09:35 网站帮忙2
那原来可以删除多个吗
2012-12-10 13:09:39 游仙
是的
2012-12-10 13:10:06 游仙
左边的那些四角形就是用来多选的
2012-12-10 13:10:16 游仙
[图片]
2012-12-10 13:11:05
[图片]13:11:05
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 13:11:08 网站帮忙2
选多个，看打印出来是什么
2012-12-10 13:11:29 游仙
是这样
2012-12-10 13:12:30 游仙
这个是你刚发过来的
2012-12-10 13:13:07 网站帮忙2
等等，我看下
2012-12-10 13:13:09 游仙
恩
2012-12-10 13:14:50 网站帮忙2
你怎么把这个文件给还原了
2012-12-10 13:15:04 游仙
啊？这就是你刚发过来的啊
2012-12-10 13:15:42 游仙
有还原了吗
2012-12-10 13:17:47 网站帮忙2
早上你发给我改之前的，你还有没有备份
2012-12-10 13:17:55 网站帮忙2
就是一开始改之前的
2012-12-10 13:17:55 游仙
有的
2012-12-10 13:18:04 游仙
呵呵有的
2012-12-10 13:18:07 网站帮忙2
你把这两个保存一下
2012-12-10 13:18:12 网站帮忙2
恢复改之前的
2012-12-10 13:18:25 网站帮忙2
我觉得你这个一开始是不能删除多个的
2012-12-10 13:18:42 游仙
原来是可以删除的
2012-12-10 13:18:48 游仙
我当然了解的
2012-12-10 13:20:37 游仙
你看 可以的
2012-12-10 13:21:03 网站帮忙2
我知道为什么了
2012-12-10 13:21:12 游仙
呵呵好的 那你看看怎么回事
2012-12-10 13:23:56 网站帮忙2
你试一下给我看，现在这样为什么删除会乱
2012-12-10 13:24:09 网站帮忙2
可能改另一个地方会好点
2012-12-10 13:25:19 网站帮忙2
你操作一下看看
2012-12-10 13:25:22 游仙
好的
2012-12-10 13:25:42 网站帮忙2
你说你原来遇到的问题就行
2012-12-10 13:25:51 网站帮忙2
改回最早的那份
2012-12-10 13:25:59 游仙
好的
2012-12-10 13:27:12 游仙
你看 删了三篇以后 第4篇的序号还是4
2012-12-10 13:27:22 游仙
我想让它变为1
2012-12-10 13:27:54 网站帮忙2
那一开始就应该改后面的排序
2012-12-10 13:28:00 游仙
你刚才就改得差不多了 就差不能同时删除多篇文章了
2012-12-10 13:28:14 网站帮忙2
可以改成删除多篇
2012-12-10 13:28:30 游仙
我本来就可以删除多篇的啊
2012-12-10 13:28:41 网站帮忙2
但要是你同时删除个几千上万篇的，可能会比较慢
2012-12-10 13:29:03 网站帮忙2
不一样呀，之前你是执行一个语句，现在执行两个，原来的就会不能用
2012-12-10 13:29:07 游仙
呵呵 我一次最多删十来二十篇 应该不必考虑那么多吧
2012-12-10 13:29:22 网站帮忙2
那行吧
2012-12-10 13:29:27 网站帮忙2
我改一下
2012-12-10 13:29:44 游仙
呵呵你尽量看看怎么弄，，真是辛苦兄弟了
2012-12-10 13:29:47 网站帮忙2
你有没有装其他的编辑器
2012-12-10 13:29:56 游仙
我有DREAMWEAVER
2012-12-10 13:30:07 网站帮忙2
有没有小点的，这个太大了
2012-12-10 13:30:12 网站帮忙2
有个格式的就行
2012-12-10 13:30:27 游仙
我这个是绿色版的 有个格式是什么意思
2012-12-10 13:31:23 网站帮忙2
就像我这个文本编辑器
2012-12-10 13:31:28 网站帮忙2
能显示格式的
2012-12-10 13:31:37 网站帮忙2
你先还原吧
2012-12-10 13:31:46 网站帮忙2
还原到我最后一次给你的
2012-12-10 13:32:42 游仙
好了现在
2012-12-10 13:33:16 游仙
是不是文件名后面要有后缀的意思
2012-12-10 13:33:36 网站帮忙2
不是，就是有关键字显示
2012-12-10 13:34:03 游仙
啊 呵呵 那除了DREAMWEAVER还有什么软件可以显示这个
2012-12-10 13:36:58 游仙
这两个
2012-12-10 13:37:33 网站帮忙2
你先忙其他事吧，我这边改完发给你
2012-12-10 13:38:01 游仙
呵呵我中午也没什么事 没关系 我就这边看你怎么做 顺便也学学呵呵
2012-12-10 13:38:40 游仙
好的 要不你先改改
2012-12-10 13:42:11
[图片]13:42:11
成功接收文件“Article_List.asp”
打开文件 打开所在文件夹
2012-12-10 13:47:45 网站帮忙2
你先弄其他的吧，我在这边弄就行了
2012-12-10 13:48:18 游仙
好的 呵呵我中午也没什么事 你帮忙弄弄吧
2012-12-10 13:49:15 游仙
我们办公室要搬到上边去了 网烙要断掉了
2012-12-10 13:50:11 网站帮忙2
恩，你先忙吧
2012-12-10 13:50:15 网站帮忙2
我再看一下
2012-12-10 13:50:33 游仙
好的 等会搬上去才能上网 要断网了
2012-12-10 13:50:47 游仙
我先下了呵呵 兄弟辛苦你了
2012-12-10 13:50:53 游仙
谢谢
2012-12-18 9:46:35 网站帮忙2
在吗
2012-12-18 9:46:45 网站帮忙2
有张图一直改不好，得问你一下
2012-12-18 11:55:48 游仙
今天网络刚用。。什么问题你问吧
2012-12-18 11:57:01 网站帮忙
这个我改成80*80
2012-12-18 11:57:08 网站帮忙
看起来就会很模糊
2012-12-18 11:57:12
[图片]11:57:12
成功接收文件“logo.psd”
打开文件 打开所在文件夹
2012-12-18 11:57:38 网站帮忙
调了外发光的拓展和大小也还很模糊
2012-12-18 11:57:50 游仙
我看看
2012-12-18 11:57:57 网站帮忙
恩，那麻烦你了
2012-12-18 11:58:24 游仙
[图片]
2012-12-18 11:58:30 游仙
这样算模糊吗
2012-12-18 11:59:31 网站帮忙
恩
2012-12-18 11:59:49 网站帮忙
字看起来，比缩小之前差很多
2012-12-18 12:00:28 游仙
那没办法了 PS它只能这么改小，图象缩小会减少像素 不变模糊也是不可能的
2012-12-18 12:01:12 网站帮忙
恩
2012-12-18 12:01:20 网站帮忙
那没办法就算了
2012-12-18 12:01:36 游仙
恩 呵呵
2012-12-28 13:39:09 网站帮忙
有空没？
2012-12-28 13:40:54 游仙
不怎么忙 有事吗
2012-12-28 13:41:09 网站帮忙
有问题得问你一下
2012-12-28 13:41:13 游仙
你说
2012-12-28 13:41:20 网站帮忙
你是不是会画画的
2012-12-28 13:41:34 网站帮忙
你会不会画一些卡通人物之类的
2012-12-28 13:42:09 游仙
会啊 但是你信不信我有好多年没动笔画了 这些年我都是用电脑画 而且都是做3D
2012-12-28 13:42:20 网站帮忙
像一些这样的
2012-12-28 13:42:16 网站帮忙
[图片]
2012-12-28 13:42:25 网站帮忙
或是更简单的
2012-12-28 13:42:42 游仙
哎 呵呵 画这么无聊的东西我会枯燥得要死
2012-12-28 13:42:54 网站帮忙
那电脑画的，不需要用画板吗
2012-12-28 13:43:06 网站帮忙
[图片]
2012-12-28 13:43:11 网站帮忙
像这种更简单的
2012-12-28 13:43:19 游仙
我是用鼠标画的
2012-12-28 13:43:48 游仙
是很简单 但是你说我一个30岁的人了 会没事喜欢画这么无聊的东西吗
2012-12-28 13:44:22 网站帮忙
我想学一点画画，画一些简单的就行。比如把一个人的图片，画成卡通版的之类
2012-12-28 13:44:27 网站帮忙
这些难不难学
2012-12-28 13:44:43 网站帮忙
你能不能教我一点，或是有没有什么好资料分享一下
2012-12-28 13:45:39 游仙
呵呵 你没有基础当然难学了 这要从小开始画的 我从7岁就开始画了 你现在都没基本功 不是我扫你信心，想学会画画那是难上加难
2012-12-28 13:46:12 网站帮忙
我只要学一些简单点的，要先学点什么基础
2012-12-28 13:46:32 游仙
资料你可以网上找找 也不知道哪里有 我自己会画当然没找过了
2012-12-28 13:47:10 游仙
画画没有简不简单的区别，画任何画都得有基本功 还要有审美能力
2012-12-28 13:47:28 游仙
而这两样都是靠自己长期积累和培养的
2012-12-28 13:48:08 游仙
如果说基础 那素描应该算是基础了
2012-12-28 13:49:52 网站帮忙
行吧，那我先上网找点资料看看
2012-12-28 13:50:34 游仙
恩呵呵
2013-01-12 14:42:01 网站帮忙
你昨天说的问题弄好没
2013-01-12 14:42:29 游仙
哎呵呵还没呢，你不是说等你有空了再帮忙吗 现在有空吗
2013-01-12 14:42:37 网站帮忙
恩
2013-01-12 14:44:48 游仙
好的 呵呵 那就好解决了 就是我后台的的友情链接的排序我想让他像上次你帮我弄的那个排序那样 修改一个链接的顺序后 其他的链接自动加1或减1
2013-01-12 14:45:00 游仙
[图片]
2013-01-12 14:45:57 游仙
我按你写那些代码改了 但是实现不了
2013-01-12 14:46:22 游仙
你那边还有我的那份源文件吗
2013-01-12 14:46:49 网站帮忙
有是有，不知道是不是最新的
2013-01-12 14:46:57 网站帮忙
也不知道你现在说的这些，是哪一个文件的
2013-01-12 14:47:22 游仙
是最新的 上次的给你的那份跟我现在的是一样的
2013-01-12 14:48:11 游仙
就是\main\admin\link3.asp这个文件
2013-01-12 14:48:54 游仙
而上次你帮我改的是\main\admin\pxcs.asp这个文件
2013-01-12 14:50:02 游仙
link3.asp就是后台的友情链接页面[图片]
2013-01-12 14:52:43 游仙
在吗
2013-01-12 14:52:55 网站帮忙
恩
2013-01-12 14:52:57 网站帮忙
等等
2013-01-12 14:52:59 网站帮忙
我在找
2013-01-12 14:53:04 游仙
好的
2013-01-12 14:57:46 网站帮忙
密码是多少
2013-01-12 14:58:06 游仙
密码是0
2013-01-12 15:09:06 游仙
可以登陆吗
2013-01-12 15:10:16 网站帮忙
恩
2013-01-12 15:10:46 游仙
呵呵好的 那再麻烦你了
2013-01-12 15:11:44 网站帮忙
现在点了是什么情况
2013-01-12 15:12:31 游仙
现在改一个链接的顺序的话 其它的链接排序不无法自动加1或减1
2013-01-12 15:13:51 游仙
你就参照你之前帮我改的pxcs.asp页面 看要怎么改
2013-01-12 15:32:13 游仙
不好改吗
2013-01-12 15:32:47 网站帮忙
等等
2013-01-12 15:32:54 游仙
好的
2013-02-20 14:07:39 游仙
在吗 兄弟 你电脑里还有没有我网站的源文件 我有几个文件可能误改了 现在出现错误 如果你有的话我就可以复原了
2013-03-27 9:57:09 游仙
在吗 兄弟
2013-03-27 9:57:28 网站帮忙
恩
2013-03-27 9:58:52 游仙
呵呵又要麻烦你了 现在我的页面提示说 “缺少对象”
我刚查了是这段代码里的问题 你能帮我看看是哪里出错了吗
2013-03-27 9:59:04 游仙
Private Sub articles_List (Rows,Cels,LeftN,zi,IsCommend,DisClass,DisTime,TimeFormat,DisHits,OrderType,Win,NewWin,Color)
Sql="select top " & Rows * Cels & " id2,Id,Title,TitleTip,TitleColor,TitleURL,Link,AddTime,Hits from articles where id2>0 and IsDelete=0"
If IsCommend Then Sql=Sql & " and IsCommend=1"
Select Case OrderType
Case Else
Sql = Sql & " order by IsTop desc,id desc"
End Select
Rs.Open Sql,Conn,0,1
StrTmp = "<table width=""95%"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
Do While Not Rs.Eof
StrTmp = StrTmp & "<tr>"
For II=1 To Cels
If Rs.Eof Then
StrTmp = StrTmp & "<td> </td>"
Else
StrTmp = StrTmp & "<td class=""newstitle"">"
If sy=1 then
If zs=1 then
StrTmp = StrTmp & "<font color=#E9E0D5>◆</font> " & Format_TitleURL4("show.asp",Rs("ID"),Rs("Title"),Rs ("TitleTip"),Rs("TitleColor"),Rs("TitleURL"),Rs("Link"),zi,Win,NewWin)
Else
StrTmp = StrTmp & "<font color=#57CFED>◆</font> " & Format_TitleURL4("show.asp",Rs("ID"),Rs("Title"),Rs ("TitleTip"),Rs("TitleColor"),Rs("TitleURL"),Rs("Link"),zi,Win,NewWin)
End If
Else
StrTmp = StrTmp & "<font color=#E9E0D5>◆</font> " & Format_TitleURL4("show.asp",Rs("ID"),Rs("Title"),Rs ("TitleTip"),Rs("TitleColor"),Rs("TitleURL"),Rs("Link"),zi,Win,NewWin)
End If
StrTmp = StrTmp & "</td>"
Rs.MoveNext
End If
Next
StrTmp = StrTmp & "</tr>"
Loop
Rs.Close
StrTmp = StrTmp & "</table>"
Response.Write(StrTmp)
End Sub
2013-03-27 9:59:58 游仙
现在有空吗
2013-03-27 10:01:14 网站帮忙
现在上班呢
2013-03-27 10:01:20 网站帮忙
回去再找你吧
2013-03-27 10:01:35 游仙
哦呵呵好的 没关系 那你先忙吧
2013-03-27 13:23:53 网站帮忙
StrTmp = "<table width=""95%"" border=""0"" cellspacing=""0"" cellpadding=""0"">"
2013-03-27 13:23:52 游仙
您好，我现在有事不在，一会再和您联系。
2013-03-27 13:23:57 网站帮忙
这句话有问题
2013-03-27 13:23:56 游仙
您好，我现在有事不在，一会再和您联系。
2013-03-27 13:24:41 网站帮忙
StrTmp = "<table width='95%' border='0' cellspacing='0' cellpadding='0'>"
2013-03-27 13:24:40 游仙
您好，我现在有事不在，一会再和您联系。
2013-03-27 13:24:43 网站帮忙
换成这句
2013-03-27 13:24:42 游仙
您好，我现在有事不在，一会再和您联系。
2013-03-27 13:24:52 网站帮忙
其他的，暂时没看出来
2013-03-27 13:24:51 游仙
您好，我现在有事不在，一会再和您联系。
2013-03-27 13:46:37 游仙
好的 呵呵谢谢兄弟 我先试试
2013-03-27 13:55:04 游仙
呵呵还是一样的问题 它错误提示“缺少对象” 不知道怎么回事
2013-03-27 13:56:54 网站帮忙
下班后说吧，现在得上班了
2013-03-27 13:57:07 游仙
好的 呵呵 先上班吧
2013-03-28 15:49:55 游仙
呵呵 兄弟 那个问题我已经解决了 现在不用麻烦你了 谢谢
2013-03-28 15:51:53 网站帮忙
呵呵，我都没做啥，谢什么呢
2013-03-28 15:52:46 游仙
谢谢你的好意啊 呵呵 兄弟一直很热心 这是我在网络里很少遇到的 我挺感激的
2013-03-28 15:53:24 网站帮忙
呵呵，网络好了吧
2013-03-28 15:54:15 游仙
没呢 这两天请电信的牵线到我的宿舍里 牵好后才有网络。。呵呵我现在住在公司里了。。
2013-03-28 15:55:21 网站帮忙
嘿，公司有得住也不错
2013-03-28 15:55:39 网站帮忙
不过我还是建议你，把网站换了，那个ASP用着太辛苦了
2013-03-28 15:58:29 游仙
呵呵 我们包吃住。。
网站换掉太花时间了 呵呵我现在又不搞网站 只是为了方便自己的工作才做的。。呵呵 以后有时间再考虑吧
2013-03-28 15:59:37 网站帮忙
那个维护的时间成本太大了，我个人觉得
2013-03-28 16:01:47 游仙
恩呵呵 不过现在也不需要维护了吧 现在我只要上传一下作品 发布一下文章就可以了 想改的地方已经都改好了 以后是要拿来服务自己用的
2013-03-28 16:03:04 网站帮忙
恩，你自己喜欢就行
2013-03-28 16:03:08 网站帮忙
先不和你说了，上班呢
2013-03-28 16:03:52 游仙
恩呵呵好的 那你也忙吧 有空再聊
2013-03-28 16:04:25 网站帮忙
恩，好的
2013-04-19 16:04:59 游仙
在吗 兄弟
2013-04-19 16:05:09 网站帮忙
在呢
2013-04-19 16:05:13 网站帮忙
回去再帮你弄吧
2013-04-19 16:05:18 网站帮忙
有事忙呢，呵呵
2013-04-19 16:05:21 网站帮忙
真不好意思
2013-04-19 16:05:24 游仙
呵呵好的 没事 你先忙
2013-04-20 8:28:28 游仙
在吗兄弟
2013-04-20 9:12:35 游仙
兄弟你帮我看看我改成这样哪里出错了
2013-04-20 9:44:12 网站帮忙
什么错了
2013-04-20 9:45:00 游仙
[表情]来了 兄弟 我改成这样了 可是页面打不开 你看哪里错了
2013-04-20 9:45:11 游仙
Sql="select * from(select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,'' as Hits from class where SortName like '%" & Keyword & "%') as x"
Select Case sType
Case "Title"
Sql = Sql & " and Title like '%" & Keyword & "%'"
Case "Content"
Sql = Sql & " and Content like '%" & Keyword & "%'"
Case Else
Sql = Sql & " and (Title like '%" & Keyword & "%' or Content like '%" & Keyword & "%')"
End Select
Sql = Sql & " order by x.AddTime desc,x.ID desc"
2013-04-20 9:45:43 网站帮忙
昨天那样不能用吗
2013-04-20 9:45:47 网站帮忙
怎么又改了
2013-04-20 9:45:56 网站帮忙
后面加那些是干嘛的
2013-04-20 9:46:04 游仙
这不就是按昨天你说的那样用进去的吗
2013-04-20 9:46:27 游仙
后面那些是它本来就有的 我只是把你写的那些套进去而已
2013-04-20 9:47:28 游仙
它的意思是 如果选择标题 那么就只在标题里搜索 选择内容就在内容里搜索
2013-04-20 9:48:27 网站帮忙
这个不是我写的吧
2013-04-20 9:48:37 网站帮忙
昨晚才百度过了
2013-04-20 9:48:46 网站帮忙
ACCESS是用*，不是用%
2013-04-20 9:48:56 网站帮忙
你把全部%改成*
2013-04-20 9:49:43 游仙
啊 对了呵呵 这个我昨天给改了 它本来就是用%的 所以我给改回来了 我改一下试试
2013-04-20 9:50:25 游仙
所以的%都要改是吗
2013-04-20 9:50:30 游仙
所有的
2013-04-20 9:50:31 网站帮忙
恩
2013-04-20 9:50:38 游仙
好的
2013-04-20 9:52:10 游仙
可现在还是打不开
2013-04-20 9:52:24 游仙
Sql="select * from(select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,'' as Hits from class where SortName like '*" & Keyword & "*') as x"
Select Case sType
Case "Title"
Sql = Sql & " and Title like '*" & Keyword & "*'"
Case "Content"
Sql = Sql & " and Content like '*" & Keyword & "*'"
Case Else
Sql = Sql & " and (Title like '*" & Keyword & "*' or Content like '*" & Keyword & "*')"
End Select
Sql = Sql & " order by x.AddTime desc,x.ID desc"
2013-04-20 9:53:27 网站帮忙
Select Case sType
Case "Title"
Sql = Sql & " and Title like '*" & Keyword & "*'"
Case "Content"
Sql = Sql & " and Content like '*" & Keyword & "*'"
Case Else
Sql = Sql & " and (Title like '*" & Keyword & "*' or Content like '*" & Keyword & "*')"
End Select
Sql = Sql & " order by x.AddTime desc,x.ID desc"
2013-04-20 9:53:33 网站帮忙
把这段先去掉
2013-04-20 9:53:44 游仙
好的
2013-04-20 9:54:15 游仙
也打不开
2013-04-20 9:55:55 游仙
记得昨晚在我自己的电脑上是提示说这一句的语句未结束
Sql="select * from(select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,'' as Hits from class where SortName like '*" & Keyword & "*') as x"
2013-04-20 9:57:04 网站帮忙
这个SQL语句在ACCESS能查到东西，打不开可能是你的ASP出问题了
2013-04-20 9:57:24 网站帮忙
你查下是不是少引号或者什么吧
2013-04-20 9:57:58 游仙
恩 我代码就是这样写的 可怎么看好象都没有什么毛病啊
2013-04-20 9:59:39 网站帮忙
有没有报错
2013-04-20 10:00:04 游仙
没报错 页面打变化开 无法访问
2013-04-20 10:00:15 游仙
打不开 无法访问
2013-04-20 10:01:11 网站帮忙
那你把它还原到最近能打开的，再把你修改过的，一点点加上去，看到哪里不能用
2013-04-20 10:02:16 游仙
最原始的代码是这样的
Sql="select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null)"
Select Case sType
Case "Title"
Sql = Sql & " and Title like '%" & Keyword & "%'"
Case "Content"
Sql = Sql & " and Content like '%" & Keyword & "%'"
Case Else
Sql = Sql & " and (Title like '%" & Keyword & "%' or Content like '%" & Keyword & "%')"
End Select
Sql = Sql & " order by AddTime desc,ID desc"
现在怎么%都变成*了 这样是不是有问题呢
2013-04-20 10:03:00 网站帮忙
那你改成最原始的没
2013-04-20 10:03:26 网站帮忙
%是匹配用的，但是ACCESS是用*
2013-04-20 10:03:36 网站帮忙
你改回原来的吧
2013-04-20 10:03:49 游仙
正段代码都改回原来的是吗
2013-04-20 10:04:03 游仙
还是只改*为%
2013-04-20 10:04:59 网站帮忙
你先改回你能打开的代码
2013-04-20 10:05:08 游仙
恩
2013-04-20 10:05:09 网站帮忙
再把修改后的一点点加进去
2013-04-20 10:05:15 游仙
好的
2013-04-20 10:07:21 游仙
要怎么一点点加呢 先加那段
2013-04-20 10:07:36 网站帮忙
现在能正常用了吗
2013-04-20 10:07:53 游仙
我恢复原来的代码了 现在正常了
2013-04-20 10:08:25 网站帮忙
那你就先改SQL吧
2013-04-20 10:09:42 游仙
就是加上select * from(………………
union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,, '' as Hits from class where SortName like '*" & Keyword & "*') as x
是吗
2013-04-20 10:10:48 网站帮忙
恩
2013-04-20 10:11:42 游仙
这样就提示了
Microsoft VBScript 编译器错误 '800a0409'
未结束的字符串常量
\游仙阁\main\AppCode\vbs.asp, line 506
2013-04-20 10:12:09 网站帮忙
看下你怎么写的
2013-04-20 10:12:22 游仙
Sql="select * from(select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,'' as Hits from class where SortName like '*" & Keyword & "*') as x"
2013-04-20 10:13:02 网站帮忙
那要是把*改成%呢
2013-04-20 10:13:14 游仙
好的
2013-04-20 10:13:52 游仙
还是同样的错误
2013-04-20 10:14:15 游仙
Sql = Sql & " order by AddTime desc,ID desc"
2013-04-20 10:14:36 游仙
这句要不要加.x.
2013-04-20 10:15:01 游仙
要不要改为Sql = Sql & " order by x.AddTime desc,x.ID desc"
2013-04-20 10:16:41 网站帮忙
你先别加排序什么
2013-04-20 10:17:24 游仙
好的 我把这句删了 但也是同样才错误
2013-04-20 10:17:31 游仙
同样的错误
2013-04-20 10:17:56 网站帮忙
Sql="select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,'' as Hits from class where SortName like '*" & Keyword & "*'"
2013-04-20 10:18:01 网站帮忙
就这句
2013-04-20 10:18:08 网站帮忙
其他的SQL先不要
2013-04-20 10:22:22 游仙
把这段删掉是吗
Select Case sType
Case "Title"
Sql = Sql & " and Title like '%" & Keyword & "%'"
Case "Content"
Sql = Sql & " and Content like '%" & Keyword & "%'"
Case Else
Sql = Sql & " and (Title like '%" & Keyword & "%' or Content like '%" & Keyword & "%')"
End Select
但啊是一样的错误
2013-04-20 10:22:28 游仙
但还是一样的错误
2013-04-20 10:22:50 网站帮忙
恩
2013-04-20 10:23:44 游仙
未结束的字符串常量
是不是少了个引号的问题
2013-04-20 10:24:37 网站帮忙
可能是ASP少引号
2013-04-20 10:24:46 网站帮忙
因为SQL昨天是能在ACCESS运行的
2013-04-20 10:25:01 网站帮忙
要么你就打印出来
2013-04-20 10:25:10 网站帮忙
再放到ACCESS执行
2013-04-20 10:25:55 游仙
像昨天那样把这一整段代码都放进去执行是吗
2013-04-20 10:27:01 网站帮忙
恩，打印先
2013-04-20 10:28:03 游仙
response.write出来是吗
2013-04-20 10:28:41 网站帮忙
好像是吧，我也不记
2013-04-20 10:28:45 网站帮忙
我不会ASP的
2013-04-20 10:28:57 网站帮忙
之前那个打印也是上网查的
2013-04-20 10:29:24 游仙
呵呵没这么谦虚的 好的 我试下
2013-04-20 10:29:56 游仙
是这样吗
sql="select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) union all
select Id,SortName as Title,'' as ClassID,'' as TitleTip,'' as TitleColor,'' as TitleURL,'' as Link,'' as Style,'' as AddTime,'' as Hits from class where SortName like '*" & Keyword & "*'"
Select Case sType
Case "Title"
Sql = Sql & " and Title like '%" & Keyword & "%'"
Case "Content"
Sql = Sql & " and Content like '%" & Keyword & "%'"
Case Else
Sql = Sql & " and (Title like '%" & Keyword & "%' or Content like '%" & Keyword & "%')"
End Select
Sql = Sql & " order by x.AddTime desc,x.ID desc"
Response.Write("sql")
怎么什么也没打印出来
2013-04-20 10:31:21 网站帮忙
你那个SELECT CASE 还不去掉呀
2013-04-20 10:31:45 游仙
呵呵好的 刚才去掉了也不行 所以我又加回去了、
2013-04-20 10:32:16 游仙
现在去掉了也一样 打不开
2013-04-20 10:36:37 网站帮忙
sql = "select * from (
select Id,Title,ClassID,TitleTip,TitleColor,TitleURL,Link,Style,AddTime,Hits from articles where IsDelete=0 and TitleColor<>'#008800' and pass='0' and ClassID in (select id from class where pass<>'1' and pass is not null) and (Title like '*3*' or Content like '*3*')
union all
select Id,SortName as Title,'暂无' as ClassID,'暂无' as TitleTip,'暂无' as TitleColor,'暂无' as TitleURL,'暂无"'as Link,'暂无' as Style,'暂无' as AddTime,'暂无' as Hits from class
where Title like '*" & Keyword & "*') as x order by x.AddTime desc,x.ID desc"
response.write sql
response.end
2013-04-20 10:46:10 游仙
哎呵呵还是一样 打不开
2013-04-20 10:49:40 游仙
还在吗兄弟
2013-04-20 10:49:53 网站帮忙
在的
2013-04-20 10:50:05 游仙
今天有上班吗
2013-04-20 10:50:12 网站帮忙
不用，休息
2013-04-20 10:50:50 游仙
呵呵 那得麻烦你一下了这个问题 我应该是解决不了了
2013-04-20 10:51:46 网站帮忙
我也不知道为什么了，我最多就能写下SQL，ASP的不懂，要是PHP还能帮下忙
2013-04-20 10:51:53 网站帮忙
刚刚那个打印不出来吗
2013-04-20 10:52:11 游仙
是啊
2013-04-20 10:52:40 游仙
真不行的话就算了 呵呵一个小小的功能 可有可没有。。
2013-04-20 10:52:49 网站帮忙
那不清楚了，要不你找些ASP交流群问下吧
2013-04-20 10:53:09 网站帮忙
我五一要是有空，可能要做个个人网站，要不到时看能不能把你的也改版了
2013-04-20 10:53:14 游仙
也谢谢兄弟了 你辛苦了 呵呵 这不是什么大不了的功能 我不要就是了。。
2013-04-20 10:53:20 网站帮忙
这个ASP现在没几个人用了
2013-04-20 10:53:26 网站帮忙
而且ACCESS也不好用
2013-04-20 10:53:38 网站帮忙
还是换成PHP+MYSQL吧
2013-04-20 10:53:55 游仙
[表情]啊呵呵那太好了 那到时候得再麻烦兄弟你了 兄弟一片好心我真的非常感动
2013-04-20 10:54:07 网站帮忙
ASP淘汰了，ACCESS很少人用的
2013-04-20 10:54:23 网站帮忙
其他SQL都是%匹配，它就非得用*
2013-04-20 10:54:43 网站帮忙
不说了，我先去吃饭了
2013-04-20 10:54:54 游仙
以后有需要也找我吧 你看 一直都是你帮我 我不帮你点什么都有点过意不去 好的 到时候麻烦你一下 我也想改成PHP的 ASP的挺被人瞧不起的呵呵
2013-04-20 10:55:16 游仙
好的 那你先吃饭去 到时候麻烦你了
2013-04-20 10:55:28 网站帮忙
呵呵，瞧不起倒不会，就是这技术确实淘汰了
2013-04-20 10:55:34 网站帮忙
没人愿意花时间去学的
2013-04-20 10:55:41 网站帮忙
下了，有空聊
2013-04-20 10:55:44 网站帮忙
拜拜
2013-04-20 10:56:01 游仙
恩呵呵 那我也想跟上潮流 用用PHP 好的 有空聊 拜拜
2013-05-13 9:11:30 游仙
在吗 兄弟
2013-05-13 9:11:44 游仙
我问一个问题
2013-05-13 9:13:08 游仙
一个ACCESS表，如果给它添加超过60个以上的字段的话合不合理
2013-05-15 8:58:50 网站帮忙
公司倒闭啦，不知道要去其他地方，还是留多一段时间，没什么心情做
2013-05-15 9:01:03 游仙
呵呵 那也没关系，换工作是很平常的事 说不定离开了这家 下一家更好呢
2013-05-15 9:02:05 网站帮忙
换新工作了
2013-05-15 9:02:09 网站帮忙
上星期就在上班了
2013-05-15 9:02:17 网站帮忙
只是觉得挺郁闷的
2013-05-15 9:02:34 网站帮忙
而且换新工作，又得忙着适应这边的新东西
2013-05-15 9:03:23 游仙
[图片]你看看 有本事换工作是随心所欲的事
没事的 习惯一些天就好了 我这些年不都是这么锻炼过来的
2013-05-15 9:03:44 网站帮忙
图裂了
2013-05-15 9:04:11 游仙
图裂是什么意思
2013-05-15 9:04:18 网站帮忙
换工作是无所谓，只是当时我还不想走。他突然关门，我房子都没到期，很不好安排
2013-05-15 9:04:27 网站帮忙
而且连补贴都没，好过份
2013-05-15 9:04:32 网站帮忙
[图片]
2013-05-15 9:06:14 游仙
哎呵呵那没事 一时不顺 慢慢会好的
2013-05-15 9:07:03 网站帮忙
恩，不说了，先上班了
2013-05-15 9:07:25 游仙
好的 那你先忙 有空聊