mlcheck.asp
上传用户:qyswxdl
上传日期:2013-06-01
资源大小:1373k
文件大小:1k
源码类别:

家庭/个人应用

开发平台:

ASP/ASPX

  1. <!--#include file="../inc/function.asp"-->
  2. <!--#include file="../security.asp"-->
  3. <!--#include file="tvconn.asp"-->
  4. <%
  5. dim js_fname
  6. dim js_falt
  7. dim sql
  8. js_fname=trim(request("js_fname"))
  9. js_falt=trim(request("js_falt"))
  10. if js_fname="" then
  11. response.write"<script language='javascript'>alert('名字不能为空呀!')</script>"
  12. response.write"<script>history.go(-1)</script>"
  13. response.end
  14. end if
  15. sql="select * from jsfolder"
  16. rs.open sql,conn,1,3
  17. rs.addnew
  18. rs("js_fname")=js_fname
  19. rs("js_falt")=js_falt
  20. rs.update
  21. rs.close
  22. set rs=nothing
  23. conn.close
  24. set conn=nothing
  25. response.write "<script language='javascript'>" & chr(13)
  26. response.write "alert('操作成功!');" & Chr(13)
  27. response.write "window.document.location.href='tvmladd.asp';"&Chr(13)
  28. response.write "</script>" & Chr(13)
  29. response.end
  30. %>