SkyDrive作为一个万能网盘,里面的东西可以直接拿来当外链,比如图片、音乐,我们就不用到处找图床了
如果文件夹权限不是公共,外链别人就无法看到,你需要先设置文件夹的共享级别“公共”才行,也就是在“分享”里,点一下“获取连接”里的公共
语言:VB 6.0
支持系统:XP以上
- 首先在文本框输入你的SkyDrive网盘需要外链的页面的地址,软件会自动识别是否符合规则,并且在后台转换为真正能够使用的网址,并获取源代码。
如果你不希望判断网址请点击“自定义URL”。
如果你希望使用本地保存的网页代码请点击“来自文件”(右键,查看源代码,复制,新建文本,粘贴) - 第一步的三个按钮软件会自动帮你点击“生成代码”
在这之后如果你对代码格式不满意,可以将代码格式修改为你希望的后再点“生成代码”即可生成你最新的格式。
之所以不每次都点上面的获取源代码按钮是为了节省访问网页的下载时间,除非你的文件有更新,否则没必要重新获取源代码。
而且有时候你尝试多了,会被微软暂时屏蔽,软件就无法自动获取代码了(手动通过网页还是行) - 如何知道有哪些代码可以用呢,点击生成的连接有房的问号按钮即可查看到可以使用的“%t(名称)”型变量。
更详细的可以查看本帖后面的附录 - 如果编好了自己喜欢的格式,点击右方的加号按钮,并输入一个名称,软件就会将你当前的格式代码加入常用代码中(关闭窗口后保存)
旁边的减号自然就是删除了,上下箭头就是移动顺序(软件启动时会自动加载第一个) - 如果对右下方生成的代码集合格式赶到不满意(比如回车不够),可以修改设置文件中的“AllLinkFormat”
“AllLinkFormat”只有“\r”、“\n”、“$1”三个特殊值,分别对应Cr、Lf、外链文本,其他字符将不会被替换(保持原样),如果需要多个换行,就多用几个“\r\n”即可。 - 生成外链文本框是但行的,如果希望生成多行的外链代码的话,请设置“/Soft/Window/Form_Main/Text_CodeFormat”与“/Soft/Window/Form_Main/Text_Link”的“Multline”=1
2012-12-25 01:53 上传下载次数: 23
(含英文版)
一些电脑系统不知道为什么不能正确获取源代码,可以使用test.exe查看获得的源代码。我的Win8(没装VB6)和编VB 6用的虚拟机XP都能正常获取源代码,但是虚拟机的Win7HomeBasic(装了VB6)、新装的XP等都不能获取,别人的Win7也是有的能行有的不行,其实原因就是获取到的源代码没有提取外链用的数那哪一行。所以我是来请教各位的,为什么有的系统不管怎样都无法获取到正确的源代码呢?
设定说明:
“GetSkyDriveLinkConfig.xml”是软件的设置文件,请使用UTF-8编码打开
<?xml version="1.0" standalone="yes"?>
<Soft><!--ListDistance是产生的列表之间相隔的像素距离,AllLinkFormat是全部链接集合的格式-->
<Config ListDistance="10" AllLinkFormat="$1\r\n"/>
<TemplateList>
<Template name="普通外链">http://storage.live.com/items/%t(id)?filename=%t(name)%t(extension)</Template>
<Template name="图片外链">[im论坛网页需要g]http://storage.live.com/items/%t(id)?filename=%t(name)%t(extension)[/img]</Template>
<Template name="含大小图片外链">[img=%t(photo.width),%t(photo.height)]http://storage.live.com/items/%t(id)?filename=%t(name)%t(extension)[/img]</Template>
</TemplateList>
<Window>
<!--可以在这里自行修改软件样式,只要知道每个控件名以及其的属性就行了,所有控件列表见附录三-->
<Form_Main Width="953" Height="509" PicURL="俺の嫁.jpg" PicDrawStyle="0">
<Picture_LinkList_In PicURL="俺の嫁.jpg" PicDrawStyle="0" PicX="-10" PicY="-130"/>
<Label_Link Caption="%t(name)%t(extension) - %t(creatorName)"/>
<Label_LinkWarn Caption="警告:该文件权限为“%t(sharingLevelValue).%t(sharingLevel)”,可能会导致无法直链"/>
</Form_Main>
<CodeListBox>
</CodeListBox>
</Window>
</Soft>
外链地址可使用“%t(名称)”变量与“%s(名称)”变量
Caption与Text属性可使用“%s(名称)”变量
PicURL等地址变量可使用“%名称%”的系统变量
附录一:
附录二:所有控件列表,后面有Index_0的是控件数组,直接更改没有Index_0的应用到所有元素,更改Index_0数字就更改其对应的单个元素设置(不过本软件没用,因为一开始就没有这些控件,是后面动态生成的)。所有Width、Height都已经设置为像素,直接输像素大小即可。图片的设置没人会去关心吧,就不说了
- /Soft/Window/Form_Main
- /Soft/Window/Form_Main/Command_CreatLinkList
- /Soft/Window/Form_Main/Command_GetFromFile
- /Soft/Window/Form_Main/Command_GetFromURL
- /Soft/Window/Form_Main/Command_ListDown
- /Soft/Window/Form_Main/Command_ListUp
- /Soft/Window/Form_Main/Command_DelToList
- /Soft/Window/Form_Main/Command_AddToList
- /Soft/Window/Form_Main/Timer_Update
- /Soft/Window/Form_Main/Text_AllLinkCode
- /Soft/Window/Form_Main/List_CodeList
- /Soft/Window/Form_Main/Command_NewWindow
- /Soft/Window/Form_Main/Picture_LinkList_Out
- /Soft/Window/Form_Main/Picture_LinkList_In
- /Soft/Window/Form_Main/Command_Link_AllValue
- /Soft/Window/Form_Main/Command_Link_AllValue/Index_0
- /Soft/Window/Form_Main/Text_Link
- /Soft/Window/Form_Main/Text_Link/Index_0
- /Soft/Window/Form_Main/Label_Link
- /Soft/Window/Form_Main/Label_Link/Index_0
- /Soft/Window/Form_Main/Label_LinkWarn
- /Soft/Window/Form_Main/Label_LinkWarn/Index_0
- /Soft/Window/Form_Main/VScroll_LinkList
- /Soft/Window/Form_Main/Text_CodeFormat
- /Soft/Window/Form_Main/Command_Updata
- /Soft/Window/Form_Main/Command_Exit
- /Soft/Window/Form_Main/Command_Get
- /Soft/Window/Form_Main/Text_URL
- /Soft/Window/Form_Main/Label_LinkList
- /Soft/Window/Form_Main/Label_AllLinkCode
- /Soft/Window/Form_Main/Label_CodeList
- /Soft/Window/Form_Main/Label_CodeFormat
- /Soft/Window/Form_Main/Label_URL
- /Soft/Window/CodeListBox
- /Soft/Window/CodeListBox/Command_Ok
- /Soft/Window/CodeListBox/Text_Code
复制代码注:SkyDrive获取网页源代码一次最多只能得到前100个文件,所以如果你那个文件夹超过100个文件,后面的就无法获取到了,可以换一个文件夹。
这里还有我以前做的在线版,但是不知道为啥php一直无法获得SkyDrive的网页源代码,所以只能各位手动填入源代码了批量提取SkyDriver外链地址工具更新