用flash调用VC打开文件对话框，取得路径。
本来想用flash的as2调用html+javascript的方法取得本地路径，但项目催得紧，没有时间研究基本不会的html了。只好使用熟悉的vc，捣鼓了一整天，凑合出一个解决方法来。不罗嗦了，见正文。
======================flash端的as2脚本如下：
//call Open file dialog
//fscommand("exec", "deleteFile.exe");
//fscommand("exec", "forFlash.exe");
System.useCodepage = true;
//System.setClipboard( "Hello world ");
var gFilePath:String;
function btn1_fun() {
var my_lv:LoadVars = new LoadVars();
var bIsStopWait:Boolean = false;
var intervalId:Number;
var duration:Number = 300000;//5 minus
fscommand("exec", "openFile.exe");
intervalId = setInterval(timerEvent, duration);
my_lv.load("fscommand/filePath.txt",my_lv,"GET");
function timerEvent():Void {
bIsStopWait = true;
clearInterval(intervalId);
title_txt.text = "Time is over.";
//my_lv.load("fscommand/filePath.txt",my_lv,"GET");
}
my_lv.onData = function(src:String) {
if (src == undefined) {
trace("Error loading title.");
title_txt.text = "loading...";
if (true == bIsStopWait) {
title_txt.text = "Time is over.";
bIsStopWait = false;
return;
}
my_lv.load("fscommand/filePath.txt",my_lv,"GET");
return;
} else {
clearInterval(intervalId);
if ("Error_Or_Cancel" == src) {
title_txt.text = "User not open a file.";
} else {
title_txt.text = src;
loadContent(src);
//file path process
gFilePath=src;
}
//call delete path file
fscommand("exec", "deleteFile.exe");
return;
}
};
}
function loadContent(pCon:String) {
var my2_lv:LoadVars = new LoadVars();
my2_lv.onData = function(src:String) {
if (src == undefined) {
trace("Error loading content.");
return;
}
content_txt.text = src;
};
my2_lv.load(pCon,my_lv,"GET");
}
//------------------background-------------------------
function btn2_fun() {
var my_lv:LoadVars = new LoadVars();
var bIsStopWait:Boolean =
相关文档：
利用as3，我们可以尝试制作一些有趣的组件，虽然现在已经有很多实用的组件，但是自己尝试写一下也是不错的。利用as3语法，借用了绘图Api我们尝试制作一下这个组件。因为我们不需要很强大的功能，对此我们只是需要选取其一部分就可以。
首先,我们所需的制作两个图形，一个是拖动的方块，一个是底图片。对于这� ......
VB显示透明FLASH效果
演示效果：
代码如下：
公共声明区域
Option Explicit
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetW ......
怕哪天再用到，省的再重新写：
#!/bin/sh
save_path=$1
log_path="/usr/local/nginx/logs/null.log"
_from=`head $log_path -n1 |awk '{print $4}'|awk -F"[" '{print $2}'|grep -oE "[A-Za-z0-9:]+"`
_end=`tail $log_path -n1 |awk '{print $4}'|awk -F"[" '{print $2}'|grep -oE "[A-Za-z0-9:]+"`
from=`echo $_ ......
《FLASH路上让我工资翻了一倍》
文·白开水
我07年.11月-09年.10月年在一家会议公司做平面，工作量小，没什么创意可言，偶尔设计下，平时套套现成的 模板，做几个简单的条幅，剩下的时间就是接电话，网上看看新闻，感觉这样下去，不是个办法。本来09年就想 换工作，刚好金融危机，裁员的很多，就打消了 ......
