www.gusucode.com > 星云DJ舞曲 4.5a源码程序 > lrc/kkk57lrc.asp

    <!--#include file="../connkkp.asp"-->
<%
dim id
dim rs,sql
id=trim(request.QueryString("id"))
if id="" then
	Response.write "<li>请选择歌曲ID！</li>"
	call error()
	Response.End 
end if
set rs=server.createobject("adodb.recordset")
sql="select * from MusicList where id="&cstr(id)
rs.open sql,conn,1,1
if rs.EOF then
	Response.write ""
	Response.End 
else
	songwords=rs("songwords")
end if
rs.close
%>
<%if isnull(trim(songwords)) then%><%else%><%=songwords%><%end if%>
<%
set rs=nothing
conn.close
set conn=nothing
%>