如何把用“，”隔开的基础数据导入数据库

'这里要先连接上数据库的比如是conn.asp文件
用数组比如：strln="aaa,bbb,cc,dd,eee,fff"
dim myarray(),i
myarray=split(strln,",")
set rs=server.createobject("adodb.recordset")
    sql="select instrln from tablename"
rs.open sql,conn,1,1
for i=0 to ubound(myarray)
    rs.addnew
    rs("instrln")=myarray(i)
    rs.update
next
set rs=nothing
set conn=nothing