<%@ Language=
VBScript %>
<%
' 检查登录状态
If Session("LoggedIn") <> True Then
Response
.Redirect "login
.asp"
End If
Dim userID, username
userID = Session("UserID")
username = Session("UserName")
Dim message, errorMsg
message = ""
errorMsg = ""
' 处理评分表单提交
If Request
.Form("action") = "submit_rating" Then
Dim itemName, score, comment
itemName = Trim(Request
.Form("item_name"))
score = CInt(Request
.Form("score"))
comment = Trim(Request
.Form("comment"))
' 验证输入
If itemName = "" Then
errorMsg = "请输入评分项目名称"
ElseIf score < 1 Or score > 5 Then
errorMsg = "评分分数必须在1-5分之间"
Else
' 插入评分记录
Dim sql
sql = "INSERT INTO Ratings (UserID, ItemName, Score, Comment, CreateTime) VALUES (" & _
userID & ", '" & Replace(itemName, "'", "''") & "', " & score & ", '" & _
Replace(comment, "'", "''") & "', Now())"
On Error Resume Next
conn
.Execute sql
If Err
.Number = 0 Then
message = "评分提交成功！"
Else
errorMsg = "提交失败: " & Err
.Description
End If
On Error Goto 0
End If
End If
' 获取用户的评分历史
Dim rs, sqlHistory
Set rs =
Server.Create
Object("ADODB
.Recordset")
sqlHistory = "SELECT ItemName, Score, Comment, CreateTime FROM Ratings " & _
"WHERE UserID = " & userID & " ORDER BY CreateTime DESC"
rs
.Open sqlHistory, conn
' 获取统计数据
Dim avgScore, totalRatings
avgScore = 0
totalRatings = 0
If Not rs
.EOF Then
Dim totalScore
totalScore = 0
Dim count
count = 0
rs
.MoveFirst
Do While Not rs
.EOF
totalScore = totalScore + rs("Score")
count = count + 1
rs
.MoveNext
Loop
avgScore = Round(totalScore / count, 2)
totalRatings = count
End If
rs
.Close
Set rs = Nothing
%>
<!DOCTYPE html>
<html lang="zh-CN">
<head>
<meta charset="UTF-8">
<meta name="viewport" content="width=device-width, initial-scale=1
.0">
<title>在线评分系统 - 评分页面</title>
<style>
* {
margin: 0;
padding: 0;
box-sizing: border-box;
}
body {
font-family: 'Microsoft YaHei', Arial, sans-serif;
background: linear-gradient(135deg, #667eea 0%, #764ba2 100%);
min-height: 100vh;
padding: 20px;
}
.container {
max-width: 1200px;
margin: 0 auto;
}
.header {
background: white;
border-radius: 10px;
padding: 20px 30px;
margin-bottom: 20px;
box-shadow: 0 5px 15px rgba(0,0,0,0
.1);
display: flex;
justify-content: space-between;
align-items: center;
}
.header h1 {
color: #333;
font-size: 24px;
}
.user-info {
display: flex;
align-items: center;
gap: 15px;
}
.user-name {
color: #667eea;
font-weight: 500;
}
.logout-btn {
background: #e74c3c;
color: white;
padding: 8px 16px;
border: none;
border-radius: 5px;
cursor: pointer;
text-decoration: none;
font-size: 14px;
transition: background 0
.3s;
}
.logout-btn:hover {
background: #c0392b;
}
.content {
display: grid;
grid-template-columns: 1fr 1fr;
gap: 20px;
}
.card {
background: white;
border-radius: 10px;
padding: 25px;
box-shadow: 0 5px 15px rgba(0,0,0,0
.1);
}
.card h2 {
color: #333;
margin-bottom: 20px;
font-size: 20px;
border-bottom: 2px solid #f1f2f6;
padding-bottom: 10px;
}
.form-group {
margin-bottom: 15px;
}
.form-group label {
display: block;
margin-bottom: 5px;
color: #333;
font-weight: 500;
}
.form-group input,
.form-group textarea,
.form-group select {
width: 100%;
padding: 10px;
border: 2px solid #ddd;
border-radius: 5px;
font-size: 14px;
font-family: inherit;
}
.form-group input:focus,
.form-group textarea:focus,
.form-group select:focus {
outline: none;
border-color: #667eea;
}
.rating-stars {
display: flex;
gap: 5px;
margin-top: 5px;
}
.star {
font-size: 24px;
color: #ddd;
cursor: pointer;
transition: color 0
.2s;
}
.star
.active {
color: #ffd700;
}
.submit-btn {
width: 100%;
padding: 12px;
background: linear-gradient(135deg, #667eea 0%, #764ba2 100%);
color: white;
border: none;
border-radius: 5px;
font-size: 16px;
cursor: pointer;
transition: transform 0
.3s;
}
.submit-btn:hover {
transform: translateY(-2px);
}
.stats {
display: flex;
justify-content: space-around;
margin-bottom: 20px;
}
.stat-item {
text-align: center;
}
.stat-value {
font-size: 24px;
font-weight: bold;
color: #667eea;
}
.stat-label {
font-size: 14px;
color: #666;
margin-top: 5px;
}
.message {
background: #d4edda;
color: #155724;
padding: 10px;
border-radius: 5px;
margin-bottom: 15px;
text-align: center;
}
.error-msg {
background: #f8d7da;
color: #721c24;
padding: 10px;
border-radius: 5px;
margin-bottom: 15px;
text-align: center;
}
.ratings-list {
max-height: 400px;
overflow-y: auto;
}
.rating-item {
border: 1px solid #f1f2f6;
border-radius: 8px;
padding: 15px;
margin-bottom: 10px;
background: #f8f9fa;
}
.rating-header {
display: flex;
justify-content: space-between;
align-items: center;
margin-bottom: 8px;
}
.rating-item-name {
font-weight: 500;
color: #333;
}
.rating-score {
background: #667eea;
color: white;
padding: 2px 8px;
border-radius: 12px;
font-size: 12px;
}
.rating-comment {
color: #666;
font-size: 14px;
margin-bottom: 5px;
}
.rating-time {
font-size: 12px;
color: #999;
}
.no-data {
text-align: center;
color: #999;
padding: 40px;
}
@media (max-width: 768px) {
.content {
grid-template-columns: 1fr;
}
.header {
flex-direction: column;
gap: 15px;
text-align: center;
}
}
</style>
</head>
<body>
<div class="container">
<div class="header">
<h1>在线评分系统</h1>
<div class="user-info">
<span class="user-name">欢迎，<%= username %></span>
<a href="logout
.asp" class="logout-btn">退出登录</a>
</div>
</div>
<div class="content">
<!-- 左侧：评分表单 -->
<div class="card">
<h2>提交评分</h2>
<% If message <> "" Then %>
<div class="message">
<%= message %>
</div>
<% End If %>
<% If errorMsg <> "" Then %>
<div class="error-msg">
<%= errorMsg %>
</div>
<% End If %>
<form method="post" action="">
<input type="hidden" name="action" value="submit_rating">
<div class="form-group">
<label for="item_name">评分项目</label>
<input type="text" id="item_name" name="item_name" placeholder="请输入要评分的项目名称" required>
</div>
<div class="form-group">
<label>评分分数</label>
<div class="rating-stars" id="ratingStars">
<span class="star" data-score="1">★</span>
<span class="star" data-score="2">★</span>
<span class="star" data-score="3">★</span>
<span class="star" data-score="4">★</span>
<span class="star" data-score="5">★</span>
</div>
<input type="hidden" id="score" name="score" required>
</div>
<div class="form-group">
<label for="comment">评分备注（可选）</label>
<textarea id="comment" name="comment" rows="3" placeholder="请输入您的评分备注"></textarea>
</div>
<button type="submit" class="submit-btn">提交评分</button>
</form>
</div>
<!-- 右侧：评分历史和统计 -->
<div class="card">
<h2>我的评分</h2>
<div class="stats">
<div class="stat-item">
<div class="stat-value"><%= totalRatings %></div>
<div class="stat-label">总评分数</div>
</div>
<div class="stat-item">
<div class="stat-value"><%= avgScore %></div>
<div class="stat-label">平均分数</div>
</div>
</div>
<div class="ratings-list">
<%
rs
.Open "SELECT ItemName, Score, Comment, CreateTime FROM Ratings " & _
"WHERE UserID = " & userID & " ORDER BY CreateTime DESC"
If rs
.EOF Then %>
<div class="no-data">
<p>暂无评分记录</p>
</div>
<% Else %>
<% Do While Not rs
.EOF %>
<div class="rating-item">
<div class="rating-header">
<span class="rating-item-name"><%= rs("ItemName") %></span>
<span class="rating-score"><%= rs("Score") %>分</span>
</div>
<% If rs("Comment") <> "" Then %>
<div class="rating-comment"><%= rs("Comment") %></div>
<% End If %>
<div class="rating-time"><%= Format
DateTime(rs("CreateTime"), 1) %> <%= Format
DateTime(rs("CreateTime"), 4) %></div>
</div>
<% rs
.MoveNext
Loop %>
<% End If
rs
.Close
Set rs = Nothing %>
</div>
</div>
</div>
</div>
<script>
// 星级评分交互
const stars = document
.querySelectorAll('
.star');
const scoreInput = document
.getElementById('score');
stars
.forEach((star, index) => {
star
.addEventListener('click', () => {
const score = index + 1;
scoreInput
.value = score;
stars
.forEach((s, i) => {
if (i < score) {
s
.classList
.add('active');
} else {
s
.classList
.remove('active');
}
});
});
star
.addEventListener('mouseenter', () => {
const hoverScore = index + 1;
stars
.forEach((s, i) => {
if (i < hoverScore) {
s
.style
.color = '#ffd700';
} else {
s
.style
.color = '#ddd';
}
});
});
});
// 重置鼠标悬停效果
document
.getElementById('ratingStars')
.addEventListener('mouseleave', () => {
const currentScore = parseInt(scoreInput
.value);
stars
.forEach((s, i) => {
if (i < currentScore) {
s
.style
.color = '#ffd700';
} else {
s
.style
.color = '#ddd';
}
});
});
</script>
</body>
</html>
<%
' 关闭数据库连接
conn
.Close
Set conn = Nothing
%> 你看看这个代码
博主开始学习ASP，在使用global.asa时出错，对象标记具有无效的 'mswc.myinfo' ProgID。博主给出了相关代码，包括ASP脚本，希望得到高手的指点。
扫一扫
845
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
