📄 skillsave.asp
字号:
<!--#include file="../conndb.asp"-->
<!--#include file="isUser.asp"-->
<html>
<head>
<title>保存技能信息</title>
</head>
<body>
<%
Function changechr(str)
changechr = Replace(str," "," ")
changechr = Replace(changechr,Chr(13),"<br>")
changechr = Replace(changechr,"'","‘")
End Function
Set rs = Server.CreateObject("ADODB.RECORDSET")
'判断是否存在此用户名技能信息
sql="Select * from Skill Where UserName='" &bb&"'"
rs.Open sql,Conn,1,3
If rs.EOF Then
rs.Close
'在数据库表Skill中插入新记录
sql="Select * from Skill"
rs.Open sql,Conn,1,3
rs.AddNew
rs("UserName")= Session("user_id")
rs("AppTitle") = Request("title")
rs("English") = Request("english")
rs("Computer") = Request("computer")
rs("Main") = changechr(Request("main"))
rs.Update
Else
'更改此技能信息
rs("AppTitle") = Request("title")
rs("English") = Request("english")
rs("Computer") = Request("computer")
rs("Main") = changechr(Request("main") )
rs.Update
End If
Response.Write "<h3>技能信息成功保存</h3>"
Set rs = Nothing
Response.Redirect "main.asp?flag=1"
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -