asp+access 在做循环时出现 数据类型不匹配

我在做批量添加时出现的。
dim action, s_id,s_paixu,se_id,no,num
s_id=cint(request("s_id"))
action=request("action")
se_id=cint(request("se_id"))
num=cint(request("num"))
num= " &p_xinghao& "

select case action

'----------------------------------------
case "add"
set rs=server.CreateObject("adodb.recordset")
for no=1 to num

" &p_xinghao& " 这个是我的数据库中某个表（例如是表a）中的字段。该字段为数字，长整型。
现在我打算套用这个" &p_xinghao& "的值来进行批量添加，但是老天报错。
Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: '[string: " &p_xinghao& "]'

/admin/admin_addwl.asp，行 22

请高手指教。

或者有别的什么办法，让我可以批量添加数据。
随便说一声，我原来做的是单个添加，
现在要改成根据另一个表中的一个字段的值来决定添加的数量。

现在改成这样：

dim action, s_id,s_paixu,se_id,no,num,mynu
s_id=cint(request("s_id"))
action=request("action"

asp+access 在做循环时出现 数据类型不匹配 在ACCESS数据库下用ASP做加法 想用asp+access在站内做一个搜索引擎 ASP如何在循环中加循环？ 怎么做循环的update asp 用ACCESS做asp网页的登陆 asp 循环 asp+access？？？ ASP+ACCESS Access asp