我从 excel 中读出相关数据,这个时候,可以取得列名 以及该列里面的所有内容,然后我有一个 textarea 多行文本框,在其中就是输入具体的内容,这个 textarea 可以修改,请看下图

在其中,有部分是变量的数据,那这些变量数据将在提交以后,利用 上面的相应对列的相对应值来改变,同时可能有很多条记录,所以需要批量修改,但小弟一直没有处理成功,请高手指点!

我利用下面的代码,成功执行了批量替换内容
因为我的查找与替换功能是根据 <$=变量名$> 这种方法来处理,那么用户在填写的时候,有可能写错了,比如 <$=姓名> 把最后一个$ 写丢了,那么这个变量就没有办法替换了,同时还会把后面的也替换不了了(不知道为什么),所以要做一个语法检查功能出来.

            
Do While Not rs.EOF
                tarea = request("tarea")
                For k=0 to Ubound(t_all)
                    tarea_count = replace(t_all(k),"<$=","")
                    tarea_count = replace(tarea_count,"$>","")
                    tarea = replace(tarea,t_all(k),rs(""&tarea_count&""))
                    wbf(k) = tarea
                    findstr = instr(tarea,"<$")
                    if k = 0 then
                        j = 0
                    else
                        j = k -1
                    end if
                    if findstr = 0 and tarea <> wbf(j) then
                        Response.Write tarea &"<br>"
                    end if
                Next                    
                rs.MoveNext
Loop