<%
topic=request.form("topic")
sv=request.form("sv")
sz=request.form("sz")
cpu=request.form("cpu")
ram=request.form("ram")
harddisk=request.form("harddisk")
netcard=request.form("netcard")
ip=request.form("ip")
price=request.form("price")
ut=request.form("ut")
userip=request.form("userip")

strsql="insert into serverhard (topic,size,cpu,ram,harddisk,netcard,ip,price,unit,server,userip) values ('"&topic&"','"&sz&"','"&cpu&"','"&ram&"','"&harddisk&"','"&netcard&"','"&ip&"','"&price&"','"&ut&"','"&sv&"','"&userip&"')"
rs.open strsql,conn%>

为什么报错是
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
报错是strsql这句话

sql关键字要用中括号

如果是字段类型不匹配，那错误源应该是数据库驱动程序，而这里说是 vbscript 编译器错误，估计可能是语法错误。

仔细看了一下 strsql 一行，没发现语法问题，估计是其他语句有语法错误而导致 vbscript 编译器查找出错行出现偏差（这种情况有时候会发生，排除这种错误也很麻烦），请仔细查看出错行后的几行，并确认语句匹配正确。