Question

.写一个ASP程序，录入学生成绩。数据库名student.mdb 中有一个学生成绩表 CJ(字段：学号 text，）怎么写

姓名 text，成绩 int)（请用recordset对象的方法）怎么写，，求求咯

Answer 1

<%
On Error Resume Next
connstring="DRIVER={Microsoft Access Driver (*.mdb)};"& "DBQ=" & server.mappath("student.mdb")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open connstring
sql="insert into CJ ( 姓名，成绩) values('XM','CJ') "
Conn.Execute(sql)
Conn.close
%>

追问

怎么没有，，用recordset对象的方法，，进行写呢？？求你咯

追答

recordset 这个是存放查询结果的，
你题目说的是录入成绩，就用不着结果集啦

Answer 2

到你。

<form id="form1" name="form1" method="post" action="?action=submit">
Please Input Your Words Here:
<input name="strings" type="text" id="strings" />
<input type="submit" name="Submit" value="GO" />
<input name="action" type="hidden" id="action" value="submit" />
</form>
<%
if request.Form("action")="submit" then
a=request.Form("strings")
n=len(a)
dim temp_num,temp_words,temp_space,temp_other
temp_num=0
temp_words=0
temp_space=0
temp_other=0

for i= 1 to n
word=asc(mid(a,i,1))
if word=32 then'空格
temp_space=temp_space+1
elseif word>=65 and word<=122 then '字母
temp_words=temp_words+1
elseif word>=48 and word<=57 then
temp_num=temp_num+1
else
temp_other=temp_other+1
end if
next
response.write "你输入的字符串：<span style='color:red;background-color: #CCC;'>"&a&"</span><br>"
response.write "空格数："&temp_space&"<br>"
response.write "数字："&temp_num&"<br>"
response.write "字母："&temp_words&"<br>"
response.write "其他："&temp_other&"<br>"
end if
%>