如何在asp中更改以列出形式出现的数据列中的数据名称？

SELECT FirstName AS 名字, LastName AS 姓氏 FROM Customers

<%
' 执行数据库查询，获取结果集
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "your_connection_string"
Dim rs
Set rs = conn.Execute("SELECT FirstName, LastName FROM Customers")

' 遍历结果集，对每一行数据进行处理
While Not rs.EOF
    ' 获取原始数据列值
    Dim firstName
    firstName = rs("FirstName")
    
    Dim lastName
    lastName = rs("LastName")
    
    ' 使用Replace()函数替换数据列名称
    firstName = Replace(firstName, "FirstName", "名字")
    lastName = Replace(lastName, "LastName", "姓氏")
    
    ' 显示修改后的数据
    Response.Write(firstName & " " & lastName & "<br>")
    
    rs.MoveNext
Wend

' 释放资源
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>