看看以前的同事写的代码

V2EX = way to explore

V2EX 是一个关于分享和探索的地方

已注册用户请登录

请不要在回答技术问题时复制粘贴 AI 生成的内容

这是一个创建于 4676 天前的主题，其中的信息可能已经有所发展或是发生改变。

<div id="content">
<MARQUEE Onmouseover=this.stop() Onmouseout=this.start() scrollAmount=1 direction=up width=1 height=1 delay="1">
<div class="content-top"><img src="images/content-top.jpg" width="938" height="4" /></div>
<div class="content-zhong">
<div class="con-left">
<p class="font">About us</p>
<p class="neirong"><%=left(rs4("eabout"),600)%>...</p>
<p class="font">Products Categories</p>
<div style="margin-top:10px; padding-left:20px;">
<% set rs=server.CreateObject("adodb.recordset")
sql="select * from product where audit=1 order by id desc"
rs.open sql,conn,1,3%>
<%
do while not rs.eof
%>
<p style="width:106px; float:left; padding:5px; line-height:34px; height:130px; background:url(images/cp-bg.jpg) no-repeat;">
<span><a href="products.asp?sort_id=<%=rs("sort_id")%>"><img src="../pic/<%=rs("pic")%>" width="96" height="88" border="0"/></a></span><br />
<a style="color:#000;" href="products.asp?sort_id=<%=rs("sort_id")%>"><%=rs("ecpmc")%></a></p>
<%
rs.movenext
loop
rs.close
%>
</div>

</div>
<div class="con-right">

</div>

<div class="content-buttom"><img src="images/content-buttom.jpg" width="938" height="4" /></div>
</div>

</body>
</html>

div

class

48 条回复 1970-01-01 08:00:00 +08:00

d0a1ccec

2013 年 7 月 5 日

我和我的小伙伴们都惊呆了.asp

66beta

2013 年 7 月 5 日

玩asp的就这水平了，当年我也这样，～～呵呵呵呵呵

thinkif

2013 年 7 月 5 日

这得看是多久以前。。。

refresh

2013 年 7 月 5 日

asp居然还在人间

yibin001

2013 年 7 月 5 日

我和我的小伙伴们都惊呆了

Ricepig

2013 年 7 月 5 日

写的不错，快速直接满足需求，哈哈

solo7net

2013 年 7 月 5 日

asp亮了

older

2013 年 7 月 5 日

很难想象他当时是在什么状态写下这样的代码

Feobe

2013 年 7 月 5 日

这是几年前的代码了？
四五年前的话，勉强情有可原。

takwai

2013 年 7 月 5 日

当年写的ASP，不都是差不多一样嘛。

timothyye

2013 年 7 月 5 日

ASP.... 古董级别的代码了

ninjai

2013 年 7 月 5 日

没看出来多大问题，asp就这样了

fangzhzh

2013 年 7 月 5 日

我是web外行, 但是:
1 我在网页里看到了select *, 难道不是写select* 都要拖出去TJJTDS吗?

2 逐条操作的代码, 这页面, 估计sql server经不起上千的访问

CoX

2013 年 7 月 5 日

看到这个，忍不住贴下我们公司官方网站的一个文件，忍不住想给重写了

http://gist.github.com/bjjay/41bfd1aa8b3a77f7b345.js

CoX

2013 年 7 月 5 日

http://gist.github.com/bjjay/41bfd1aa8b3a77f7b345

CoX

2013 年 7 月 5 日

https://gist.github.com/bjjay/41bfd1aa8b3a77f7b345.js

yibin001

2013 年 7 月 5 日

CoX

2013 年 7 月 5 日

https://gist.github.com/bjjay/41bfd1aa8b3a77f7b345

yibin001

2013 年 7 月 5 日

呃。。本想帮一下楼上。。。结果发现我也不会。。
@CoX

CoX

2013 年 7 月 5 日

又不会帖gist的代码了，不折腾了

CoX

2013 年 7 月 5 日

@yibin001 呵呵，很久以前帖成功过，现在又不记得了

subpo

2013 年 7 月 5 日

http://gist.github.com/bjjay/41bfd1aa8b3a77f7b345.js

Hyperion

2013 年 7 月 5 日

看到"MARQUEE", 我就颤抖了... 这是啥年代的标签了...

yibin001

2013 年 7 月 5 日

@CoX
是不是因为这个gist是私有的原因？我看文件名是一个hash值啊

refresh

2013 年 7 月 5 日 via iPad

@CoX 牛逼的代码

binjoo

2013 年 7 月 5 日

凑合着用吧。

Sunyanzi

2013 年 7 月 5 日

顶楼的 ASP 没有任何问题 ..? 换言之 ... 如果不这么写还能怎么写 ..?

那段 js 虽然难看点 ... 但感觉问题也不大 ...

能用 ... 效率不低 ... 且重构复杂 ... 只是无法维护罢了 ...

manoon

2013 年 7 月 5 日

很有我的风格，一直这样写，从未被超越
现在不知道，反正对于ASP来说，以前。
很少会有MVC相关的概念，也没有一些简单易用类似于SMARTY之类的框架。

workaholic

2013 年 7 月 5 日

我和我的小伙伴们都惊呆了

CoX

2013 年 7 月 5 日

@yibin001 不是私有gist，可以直接查看的啊

@refresh 我估计我们公司这个官网是找某个个人做的，具体做了多久不知道了。我贴的那堆代码就是为了实现在一个表里做个简单查询。另外，整个数据库的表设计的是一塌糊涂。公司想让改版，我就建议重写。

sarices

2013 年 7 月 5 日

asp不是这样写的，我当年是用jscript写asp，然后用xsl做模板，封装好类库，尽量用MVC结构实现，这样后面接手的根据文档能很方便修改。

raptor

2013 年 7 月 5 日

不错了。我以前同事写过用拼音首字母缩写做变量名的…比如：时间是SJ…

icoder

2013 年 7 月 5 日

代码咋样无所谓的，运行没毛病就行了

hellmash

2013 年 7 月 5 日

看到这段代码就想起00年用asp做基于exchange5.5的公文流转，那时候多羡慕那些基于LotusNotes/Domino做的公文流转

VYSE

2013 年 7 月 5 日

asp页面这样再正常不过，嘲笑早期开发者的工作想想以后会不会有人嘲笑现在人的工作

qingfeng

2013 年 7 月 5 日

quick and dirty风格，我喜欢！

013231

2013 年 7 月 5 日

@CoX V2EX只能Public Gist, 你那是Secret Gist. 建一Gist底下有按可的.

haichong520

2013 年 7 月 5 日

Beautiful Code

holy_sin

2013 年 7 月 5 日

好恶心啊

wtser

2013 年 7 月 5 日

强迫症来了，想重构的冲动！！！

infong

2013 年 7 月 5 日

好喜欢这样的风格。XD。

Kvm

2013 年 7 月 6 日

10年前php也基本这个样吧
ASP的MVC概念还没起来就已经被抛弃了。。。
看到过ASP写得很好的，但是局限于ASP本身的问题最后也随波逐流了。。。。。

Perry

2013 年 7 月 6 日 via iPhone

@CoX http://github.com/数字ID

Perry

2013 年 7 月 6 日 via iPhone

http://gis.github.com/数字ID
@CoX

daoluan

2013 年 7 月 6 日

恩，小伙伴们都惊呆了。

46fo

2013 年 7 月 6 日

楼主敢秀你自己的代码么？？？再怎么完美也会有人吐槽的

older

2013 年 7 月 6 日

@xdeng




<%
language = "cn"

productsPartID = request("ProductsPartID")
dim strSql , strWhere, strTitle
strSql = " SELECT Productsid,pics,pic,ProductsText,ProductsName,ProductsPartID FROM RF_Products WHERE DisplayLevel > 0 AND productsName <> '' "

if productsPartID <> "" then ' 类别ID是否为空
ProductsPartID = clng(productsPartID)
StrSqlPart="select ProductsPartName from RF_ProductsPart where ProductsPartID= " & ProductsPartID
Set rsPart=conn.execute(StrSqlPart)
strTitle = rsPart("ProductsPartName")
else
ProductsPartID = 0
strTitle = "产品展示"
end if
if request("q") <> "" then '搜索关键字不空
strWhere=" AND ProductsName like '%"&request("q")&"%' OR ProductsText like '%"&request("q")&"%'"
end if
if ProductsPartID <> 0 then strWhere = strWhere &" AND ProductsPartID ="&ProductsPartID
strSql = strSql & strWhere & " order by DisplayLevel DESC , ProductsName ASC"
'Response.Write(strSql)

if sm ="" then
sm=0
else
sm=sm-1
end if

%>
<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="Content-Type" cOntent="text/html; charset=">
<title><%=strTitle%>--<%=WebTitle%></title>
<META name="description" cOntent="<%=Description%>">
<meta name="keywords" cOntent="<%=Keywords%>">
<link rel="stylesheet" type="text/css" href="css/_main.css"/>

<script type="text/Javascript" src="js/subMenu.js"></script>
</head>

<body>

<div class="wrap">
<div class="side">
<ul class="sideMenu">
<%=productClassNavBig (language,productsPartID) %>
</ul>
</div>
<div class="content">
<div class="content-head"><a href="index.asp">首页</a><span>>></span><a href="productIndex.asp">产品中心</a><span>>></span><%=strTitle%></div>

<ul class="productList">
<%
Set mypage=new xdownpage '创建对象
mypage.getcOnn=conn '得到数据库连接

mypage.getsql=strSql
mypage.pagesize=15 '设置每一页的记录条数据为5条
set rs=mypage.getrs() '返回Recordset

for i=1 to mypage.pagesize '接下来的操作就和操作一个普通Recordset对象一样操作
if not rs.eof then '这个标记是为了防止最后一页的溢出
response.write"<li><a href=""ProductShow.asp?ProductsPartID="&rs("ProductsPartID")&"&sm="&sm+1&"&ProductsID="&rs("Productsid")&""" target=""_blank"" ><img src=""pics/"&rs("pics")&""" alt="""&rs("ProductsName")&""" /></a><dl><dt><a href=""ProductShow.asp?ProductsPartID="&rs("ProductsPartID")&"&sm="&sm&"&ProductsID="&rs("Productsid")&""" target=""_blank"" >"&rs("ProductsName")&"</a></dt></dl></li>"& chr(10)

rs.movenext
else
exit for
end if
next
%>
</ul>
<div class="cb pl20">
<%
mypage.showpage()
%>
</div>

</div>
</div>

</body>
</html>

46fo

2013 年 7 月 6 日

@older 其实我我看不懂。。。。^o^