|
发表于 2007-5-25 13:27:54
|
显示全部楼层
修改后的代码如下:
<%
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
%> |
|