<%
dim filename,filepath,jtime,sxing,dname,sid,btl,zp,zsxing,ypml,ypcyl
filename=server.mappath("4.asf")        '需要转换的文件写绝对路径，如：E:\www\1.wmv
filepath=server.mappath(".\")                      '需要转换的文件写绝对路径，如：E:\www\ 
jtime="15"                                                             '截图时间
sxing="120x90"                                                        '截图大小

'--------------------以下不熟悉建议使用默认--------------------------------------------------------
btl="200"                                                              '比特率 默认为200
zp="25"                                                                '设置帧频 缺省25
zsxing="320x240"                                                       '设置帧大小 一般为320x240
ypml="56"                                                              '设置音频码率 默认为56
ypcyl="22050"                                                          '设置音频采样率每人为22050
'---------------------------------------------------------------------------------------------------

dname="www.ewind.cn"                                                   '官方验证码(不可以修改)
sid="187BB-159U2-BF939-C548Q-463Z3"                                        '正版序列号,到官方获取
'------------------------------------------------------------
'以上信息为配置信息，请合理修改
set obj=Server.CreateObject("flv.toflv")
obj.AspInit
ffilename=obj.check(filename,filepath,btl,zp,zsxing,ypml,ypcyl,jtime,sxing,dname,sid)
'ffilename=obj.flv(filename,filepath)
response.write ffilename
set obj = nothing
%>