我在BBS论坛弄了一个砸蛋获得物品的插件，获得物品的字段内容格式为出现率1|数量1|物品名1,出现率2|数量2|物品名2，依次类推一共12种物品。我是这样写的
rs.open "select * from 砸蛋 where user='" & name &"'",conn,1,1
zlwp=rs("物品")
        data1=split(zlwp,",")
        data2=ubound(data1)
        for kk=0 to data2-1
                data3=split(data1(kk),"|")
                wp_sl=data3(1)
                wp_name=data3(2)
                wp_list=wp_list&"|"&wp_name '获得物品列表
                tempjiasl=wpadd(wp_name,Session("sjjh_myid"),wp_sl) '物品入库
        next
这样写，每砸一次所有的物品都能获得，我想实现的是
每砸一次，都会根据出现率来判断是否可以获得此物品，这个物品字段的出现率是可以在后台随意设置的。
比如我设置出现率为20，那么必须要砸够20次才可以获得此物品，如果出现率设置为1，则是每砸一次就会获得出现率为1的5种随机物品，各位大神这个该怎么修改呢
初学者实在不知道该怎么修改