数码资讯
服务器端文件是用XML+js+js实现的。
首先,创建一个程序在服务器端生成一个XML文件返回给客户端,(getfolder。ASP)。 = Len) { strshow + = ; } 其他的 { strshow + = + arrff {点} + ; } } strshow + = } strshow + = } filebox。文件。体
选购提示
关注价格、性能、续航、售后和真实使用场景,理性比较后再下单。
首先,创建一个程序在服务器端生成一个XML文件返回给客户端,(getfolder。ASP)。
<
林张晨写的,2003-4-20
转载请注明来源并保留版权信息。
response.write CHR(13)
response.write CHR(13)
文件夹=请求(文件夹)
如果文件夹,那么
文件夹
最后如果
模糊数
数= 0
文件夹=替换(文件夹,)…
basefolder = 。 / / 媒体基线文件夹路径
newfolder = basefolderfolders
设置FSO = server.createobject(脚本。FileSystemObject )
集F = fso.getfolder(server.mappath(newfolder))
设置SF = f.subfolders
每个sf'returns FD列表指定路径下的文件夹
response.write CHR(13)
response.write 文件夹CHR(13)
响应。写FD。名称也就;CHR(13)。
response.write CHR(13)
计数=计数+ 1
下一个
设置=无
集FF = f.files
对于FF中的每个FI
名为fi.name
如果仪器(ASF、WMA,WMV
response.write CHR(13)
response.write 文件CHR(13)
响应。写fnamequot;CHR(13)。
response.write CHR(13)
计数=计数+ 1
最后如果
下一个
如果该目录中没有文件,则发送一个空元素。
如果计数= 0然后
response.write CHR(13)
response.write 空CHR(13)
response.write 0 CHR(13)
response.write CHR(13)
最后如果
response.write
设置FF =无
设置f =无
设置FSO
%>
以下是客户端的JS Kung Fu(选择。asp)
选择视频文件
TD {字体大小:9pt }
选择{宽度:210 }
宽度:250 }
<!——
/ *林张晨写的,2003-4-20
请注明来源并保留此版权信息。
加载图片
无功imgback =新的图像();
imgback.src =图像/箭头.gif;
无功imgbackgray =新的图像();
imgbackgray.src =图像/ grayarrow .gif;
无功imgfolder =新的图像();
imgfolder.src =图像/文件夹。gif;
无功imggrayfolder =新的图像();
imggrayfolder.src =图像/ grayfolder .gif;
历史堆栈数组
无功arrhistory =新的数组();
VAR我= 0;
返回用于标识的文件名。
功能检查()
{
如果(文件,文件名,值=)
{
警报(请先选择文件);
返回false;
}
其他的
{
window.returnvalue =文件。F1值+ document.all.filename.value。文件夹;
Window.close();
}
}
获取xml文件的内容
功能获得用户信息列表的存储过程(URL)
{ var oxmldoc =新的ActiveX对象('msxml);
oxmldoc.url =网址;
无功ooroot = oxmldoc.root;
返回ooroot;
}
在返回到文本框的值中当选时的文件
功能增加文件(TXT)
{
文档。所有文件名;
}
var第一= 1;定义全局变量。
功能的用户列表(文件夹,Ti) / /列表框
{文件夹;
filebox。文件。体.innerHTML =加载文件,请稍等…;
无功strshow = ;
无功timeoutid = null;
无功newfolder = ;
无功arrfolder =新的数组();
无功arrff =新的数组();
无功blankstr = ;
无功oitem;
确定历史状态
Hisi + = Ti;
我arrhistory { } =文件夹;
如果(我= = 0)
{
箭头.innerHTML = ;
}
其他的
{
箭头.innerHTML = ;
}
确定当前文件夹
如果(文件文件夹=值)
{
folderid .innerHTML =
}
其他的
{ newsfolder = checkfolder(文档。F1。文件夹。值)
folderid .innerHTML =
}
对下拉框分配
文档。所有选项。长度= 0;
newfolder =文件夹;
folderstr =
无功_obj = document.all.select;
无功_o = document.createelement(选项);
_o。文本=选择文件夹;
_o价值= ;
_obj.add(_o);
如果(newfolder!
{ arrfolder = newfolder.split( / )
对于(var i = 0;i < arrfolder.length-1;i++)
{ blankstr + = ;
folderstr + = arrfolder {我} + / ;
_o = document.createelement(选项);
_o。文本= blankstr + arrfolder {我};
_o价值= folderstr;
_obj.add(_o);
}
}
文件。所有的选择。选择{文件。所有的选择。选择。length-1 }。选中=真;
url =getfolder。ASP。glfolder =+文件夹;
oroot =获得用户信息列表的存储过程(URL)
strshow = ;
oroot.children.length len =;
如果(= = 1)
{ oitem = oroot.children.item(0);
如果(oitem.children.item(0)。文字= =空)
strshow = 文件和文件夹;
其他的
{
如果(oitem.children.item(0)。文字= =文件夹)
{
strshow + = + oitem.children.item(1)。文字+ ;
}
其他的
{
strshow + = + oitem.children.item(1)。文字+ ;
}
}
strshow + =
}
别的{
数据堆栈
为(i = 0;i;;i;+)
{ oitem = oroot.children.item(我);
如果(oitem.children.item(0)。文字= =文件夹)
{
我arrff { } = + oitem.children.item(1)。文字+ ;
}
其他的
{
我arrff { } = + oitem.children.item(1)。文字+ ;
}
}
获取输出的列的数目。
如果(= < = 6)
{ = 1;
y=6;}
其他的
6;
y=6;}
对于(var i = 0;i < y;i + +)
{ strshow + =
对于(var j=0;j x;j + +)
{点= J* Y +我;
如果(点> = Len)
{
strshow + = ;
}
其他的
{
strshow + = + arrff {点} + ;
}
}
strshow + =
}
strshow + =
}
filebox。文件。体.innerHTML = strshow;
}
功能checkfolder(folderstr)
如果(folderstr = 或仪器(folderstr, / )= instrrev(folderstr, / ))然后
checkfolder =
其他的
nfolder =左(folderstr,len(folderstr)- 1)
checkfolder =左(nfolder,instrrev(nfolder, / ))
最后如果
端功能
查找范围(i):
文件的名称(n):
开(o)
文件类型(t):
流媒体文件(*. ASF,WMV、WMA *。*。)
有一个小的文件,blank.htm,定义文件和文件夹的显示方式
新的文件
TD {字体大小:9pt }
体{字体大小:9pt }
。文件{颜色:# 000000;text-decoration:无;字体大小:9pt }
。文件:访问{颜色:# 000000;text-decoration:无;字体大小:9pt }
文件一:悬停{颜色:# 000000;text-decoration:无;字体大小:9pt }
当调用使用时,可以使用以下函数来实现错误的服务器端文件选择的效果
选择()函数
{
var arr = showModalDialog(选择。asptemp =+ Math.random()(),
如果(ARR!= null)
{
报酬
}
}
<
林张晨写的,2003-4-20
转载请注明来源并保留版权信息。
response.write CHR(13)
response.write CHR(13)
文件夹=请求(文件夹)
如果文件夹,那么
文件夹
最后如果
模糊数
数= 0
文件夹=替换(文件夹,)…
basefolder = 。 / / 媒体基线文件夹路径
newfolder = basefolderfolders
设置FSO = server.createobject(脚本。FileSystemObject )
集F = fso.getfolder(server.mappath(newfolder))
设置SF = f.subfolders
每个sf'returns FD列表指定路径下的文件夹
response.write CHR(13)
response.write 文件夹CHR(13)
响应。写FD。名称也就;CHR(13)。
response.write CHR(13)
计数=计数+ 1
下一个
设置=无
集FF = f.files
对于FF中的每个FI
名为fi.name
如果仪器(ASF、WMA,WMV
response.write CHR(13)
response.write 文件CHR(13)
响应。写fnamequot;CHR(13)。
response.write CHR(13)
计数=计数+ 1
最后如果
下一个
如果该目录中没有文件,则发送一个空元素。
如果计数= 0然后
response.write CHR(13)
response.write 空CHR(13)
response.write 0 CHR(13)
response.write CHR(13)
最后如果
response.write
设置FF =无
设置f =无
设置FSO
%>
以下是客户端的JS Kung Fu(选择。asp)
选择视频文件
TD {字体大小:9pt }
选择{宽度:210 }
宽度:250 }
<!——
/ *林张晨写的,2003-4-20
请注明来源并保留此版权信息。
加载图片
无功imgback =新的图像();
imgback.src =图像/箭头.gif;
无功imgbackgray =新的图像();
imgbackgray.src =图像/ grayarrow .gif;
无功imgfolder =新的图像();
imgfolder.src =图像/文件夹。gif;
无功imggrayfolder =新的图像();
imggrayfolder.src =图像/ grayfolder .gif;
历史堆栈数组
无功arrhistory =新的数组();
VAR我= 0;
返回用于标识的文件名。
功能检查()
{
如果(文件,文件名,值=)
{
警报(请先选择文件);
返回false;
}
其他的
{
window.returnvalue =文件。F1值+ document.all.filename.value。文件夹;
Window.close();
}
}
获取xml文件的内容
功能获得用户信息列表的存储过程(URL)
{ var oxmldoc =新的ActiveX对象('msxml);
oxmldoc.url =网址;
无功ooroot = oxmldoc.root;
返回ooroot;
}
在返回到文本框的值中当选时的文件
功能增加文件(TXT)
{
文档。所有文件名;
}
var第一= 1;定义全局变量。
功能的用户列表(文件夹,Ti) / /列表框
{文件夹;
filebox。文件。体.innerHTML =加载文件,请稍等…;
无功strshow = ;
无功timeoutid = null;
无功newfolder = ;
无功arrfolder =新的数组();
无功arrff =新的数组();
无功blankstr = ;
无功oitem;
确定历史状态
Hisi + = Ti;
我arrhistory { } =文件夹;
如果(我= = 0)
{
箭头.innerHTML = ;
}
其他的
{
箭头.innerHTML = ;
}
确定当前文件夹
如果(文件文件夹=值)
{
folderid .innerHTML =
}
其他的
{ newsfolder = checkfolder(文档。F1。文件夹。值)
folderid .innerHTML =
}
对下拉框分配
文档。所有选项。长度= 0;
newfolder =文件夹;
folderstr =
无功_obj = document.all.select;
无功_o = document.createelement(选项);
_o。文本=选择文件夹;
_o价值= ;
_obj.add(_o);
如果(newfolder!
{ arrfolder = newfolder.split( / )
对于(var i = 0;i < arrfolder.length-1;i++)
{ blankstr + = ;
folderstr + = arrfolder {我} + / ;
_o = document.createelement(选项);
_o。文本= blankstr + arrfolder {我};
_o价值= folderstr;
_obj.add(_o);
}
}
文件。所有的选择。选择{文件。所有的选择。选择。length-1 }。选中=真;
url =getfolder。ASP。glfolder =+文件夹;
oroot =获得用户信息列表的存储过程(URL)
strshow = ;
oroot.children.length len =;
如果(= = 1)
{ oitem = oroot.children.item(0);
如果(oitem.children.item(0)。文字= =空)
strshow = 文件和文件夹;
其他的
{
如果(oitem.children.item(0)。文字= =文件夹)
{
strshow + = + oitem.children.item(1)。文字+ ;
}
其他的
{
strshow + = + oitem.children.item(1)。文字+ ;
}
}
strshow + =
}
别的{
数据堆栈
为(i = 0;i;;i;+)
{ oitem = oroot.children.item(我);
如果(oitem.children.item(0)。文字= =文件夹)
{
我arrff { } = + oitem.children.item(1)。文字+ ;
}
其他的
{
我arrff { } = + oitem.children.item(1)。文字+ ;
}
}
获取输出的列的数目。
如果(= < = 6)
{ = 1;
y=6;}
其他的
6;
y=6;}
对于(var i = 0;i < y;i + +)
{ strshow + =
对于(var j=0;j x;j + +)
{点= J* Y +我;
如果(点> = Len)
{
strshow + = ;
}
其他的
{
strshow + = + arrff {点} + ;
}
}
strshow + =
}
strshow + =
}
filebox。文件。体.innerHTML = strshow;
}
功能checkfolder(folderstr)
如果(folderstr = 或仪器(folderstr, / )= instrrev(folderstr, / ))然后
checkfolder =
其他的
nfolder =左(folderstr,len(folderstr)- 1)
checkfolder =左(nfolder,instrrev(nfolder, / ))
最后如果
端功能
查找范围(i):
文件的名称(n):
开(o)
文件类型(t):
流媒体文件(*. ASF,WMV、WMA *。*。)
有一个小的文件,blank.htm,定义文件和文件夹的显示方式
新的文件
TD {字体大小:9pt }
体{字体大小:9pt }
。文件{颜色:# 000000;text-decoration:无;字体大小:9pt }
。文件:访问{颜色:# 000000;text-decoration:无;字体大小:9pt }
文件一:悬停{颜色:# 000000;text-decoration:无;字体大小:9pt }
当调用使用时,可以使用以下函数来实现错误的服务器端文件选择的效果
选择()函数
{
var arr = showModalDialog(选择。asptemp =+ Math.random()(),
如果(ARR!= null)
{
报酬
}
}
声明:本文内容用于数码产品信息整理与选购参考,具体价格、库存、售后政策以官方渠道和电商页面实时信息为准。