<%
sql=\"select top 15 * from job_T_course,JOB_T_train where train_flag=1 and JOB_T_train.train_tmember=job_T_course.course_tmember order by course_announcedate desc\"
set rs=server.CreateObject(\"adodb.recordset\")
rs.open sql,conn,1,1
for i=1 to rs.recordcount
response.write \"<tr align=\'center\'>\"
response.write \"<td><a href=\'course_info.asp?id=\"&rs(\"course_id\")&\"\' target=\'_blank\'>\"
if len(rs(\"course_name\"))>16 then response.write left(rs(\"course_name\"),16)& \"..\" else response.write rs(\"course_name\") end if
response.write \"</a></td>\"
response.write \"<td nowrap>\"
set rsw=conn.execute(\"select province_city from JOB_provinceandcity where id=\"&rs(\"course_provinceid\"))
course_province=rsw(\"province_city\")
rsw.close
set rsw=nothing
set rsw=conn.execute(\"select province_city from JOB_provinceandcity where id=\"&rs(\"course_capitalid\"))
course_capital=rsw(\"province_city\")
rsw.close
set rsw=nothing
set rsw=conn.execute(\"select province_city from JOB_provinceandcity where id=\"&rs(\"course_cityid\"))
if not(rsw.eof) then
course_city=rsw(\"province_city\")
end if
rsw.close
set rsw=nothing
response.Write course_province&\" \"&course_capital&\" \"&course_city
response.Write \"</td>\"
response.write \"<td nowrap>\"&rs(\"course_begin\")&\"</td>\"
response.write \"<td><a href=\'train_info.asp?id=\"&rs(\"JOB_T_train.train_id\")&\"\' target=\'_blank\'>\"
if len(rs(\"train_name\"))>14 then response.write left(rs(\"train_name\"),14)& \"..\" else response.write rs(\"train_name\") end if
response.write \"</a></td>\"
response.write \"</tr>\"
rs.movenext
next
rs.close
set rs=nothing
conn.close
set conn=nothing
%> 都是一些细节的部分老大是不是总三心二意呀 呵呵
6.0的界面初看是不错可我越看越别扭 不知道怎么搞的呵呵 不够大气。。。。 当然,精简版的功能不变,界面我们会设计多种风格的,客户可根据自己喜欢的风格还设计
欢迎提建议 我在等着盗版
fdsafsdaf
sdafsdafsdaf漂亮
比以前的版本好看多了.6.0 不知何时发布.
等不及了...... 好象发布拉..怎么办那么高的价格!
http://www.lmpx.net/bbs/Default.asp 我的确设计在线 价格高低不等的,呵呵
你还顺便发个广告