同步器源码

① 如何用按键精灵实现 多窗口同步操作 .. 有源码请发源码.. 100分. .详细注释再加100

aa = WaitKey()
Hwnd = Plugin.Window.MousePoint()
bb = WaitKey()
Hwnd2 = Plugin.Window.MousePoint()

While True
Call Plugin.Bkgnd.KeyPress(Hwnd, 65)
Call Plugin.Bkgnd.KeyPress(Hwnd2, 65)
Wend
EndScript

分别获取2个窗口的句柄。后台操作。

② 谁有安卓手机编程 手机时间校对，时间同步工具的源代码

手机时间校对设置里就有 设置→日期和时间→自动确定日期和时间（最后一步可能有的手机不一样但是大概意思是这样），望采纳

③ 按键精灵键盘同步

按键精灵键鼠同步器源码分享，具体实现同步步骤如下：

1、获取主窗口和被同步窗口句柄

●WaitKey命令等待键盘按下

●按下F6则获取当前鼠标指向的窗口句柄，作为主窗口句柄。

●按下F7则获取当前鼠标指向的窗口句柄，作为同步窗口句柄。

●用Do循环来等待按键，当主窗口句柄和同步窗口句柄都获取到时，退出Do循环

●代码

Do

Key=WaitKey()

IfKey=117Then

主窗口=Plugin.Window.MousePoint()

EndIf

IfKey=118Then

同步窗口=Plugin.Window.MousePoint()

EndIf

Delay500

If主窗口<>0and同步窗口<>0Then

ExitDo

EndIf

Loop

2、设置两个窗口的窗口大小一致

●窗口大小一致，同步的时候鼠标才能移动到正确的位置。

●代码

CallPlugin.Window.Size(主窗口,800,600)

CallPlugin.Window.Size(同步窗口,800,600)

3、获取主窗口的左上角坐标

●GetWindowRect命令获取主窗口的左上角坐标

●代码

sRect=Plugin.Window.GetWindowRect(主窗口)

dimMyArray

MyArray=Split(sRect,"|")

L=Clng(MyArray(0)):T=Clng(MyArray(1))

4、获取当前鼠标在主窗口的位置

●GetCursorPos命令获取当前鼠标位置

●代码

GetCursorPosmx,my

5、计算主窗口内当前鼠标位置和窗口左上角距离

●公式：当前鼠标位置减去窗口左上角坐标值（mx-L,my-T）

6开始同步

●被同步窗口，使用按键后台键鼠命令，将鼠标移动到和主窗口相同的位置

（按键后台命令鼠标移动是以窗口客户区左上角坐标为基点）

●代码

CallPlugin.Bkgnd.MoveTo(同步窗口,mx-L,my-T)

●在主窗口内按下任意键时，同步窗口也执行同样的操作

●代码

Key=GetLastKey()

CallPlugin.Bkgnd.KeyPress(同步窗口,Key)

④ 谁给我个易语言MP3播放器源码啊 要进度条和显示歌词和列表

.版本 2
.支持库 edroptarget
.支持库 eMMedia
.程序集 窗口程序集_启动窗口
.程序集变量 文件, 文本型
.程序集变量 类型, 整数型
.子程序 _播放按钮_被单击
播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))
同步播放MP3 (列表框1.取项目文本 (列表框1.现行选中项), 0, 标签1, )
文件 ＝ 列表框1.取项目文本 (列表框1.现行选中项)
类型 ＝ _专辑图片_文件名取专辑图片类型 (文件)
_专辑图片_文件名取专辑图片_到图片框 (文件, 图片框1, 类型)
.子程序 _按钮1_被单击
通用对话框1.打开 ()
列表框1.加入项目 (通用对话框1.文件名, )
' ------------------------------------------------------------------------------------
' 打开对话框，然后在列表框中加入对话框中选择的文件
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
进度条1.位置 ＝ 参数一
' ------------------------------------------------------------------------------------------------------
' 参数一是MP3的播放进度，进度条的位置将实时同步参数一
' ：)
.子程序 _暂停按钮_被单击
暂停播放MP3 ()
.子程序 _继续按钮_被单击
继续播放MP3 ()
.子程序 _时钟1_周期事件
.如果真 (取MP3播放状态 () ＝ 0)
_启动窗口.标题 ＝ “等待播放”
.如果真结束
.如果真 (取MP3播放状态 () ＝ -1)
_启动窗口.标题 ＝ “暂停” ＋ “ ” ＋ 到文本 (进度条1.位置) ＋ “%”
.如果真结束
.如果真 (取MP3播放状态 () ＝ 1)
_启动窗口.标题 ＝ 到文本 (“播放中” ＋ “ ” ＋ 到文本 (进度条1.位置) ＋ “%”)
.如果真结束
' ------------------------------------------------------------------------------------------------------------------------
' 每1毫秒都会检测上面“如果真”的代码，真的真将会执行代码
.子程序 __启动窗口_位置被改变
.如果真 (_启动窗口.位置 ＝ 2)
_启动窗口.可视 ＝ 假
置托盘图标 (#托盘, _启动窗口.标题)
.如果真结束
' -------------------------------------------------------------------------------------------------------------------------
' 如果窗口被最小化，将会看不到窗口，程序将会放到托盘里
.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型
.如果真 (操作类型 ＝ #单击左键)
_启动窗口.位置 ＝ 1
_启动窗口.可视 ＝ 真
.如果真结束
.如果真 (操作类型 ＝ #单击右键)
弹出托盘菜单 (托盘菜单)
.如果真结束
' -----------------------------------------------------------------------------------------------------------------
' 如果单击了左键，将会把窗口回复，可以看到窗口
' 如果单击了右键，将会弹出“托盘菜单”这个菜单
.子程序 _播放_被选择
播放MP3 (-1, 列表框1.取项目文本 (列表框1.现行选中项))
.子程序 _暂停_被选择
暂停播放MP3 ()
.子程序 _继续_被选择
继续播放MP3 ()
.子程序 _关闭_被选择
销毁 ()
.子程序 _恢复_被选择
_启动窗口.位置 ＝ 2
_启动窗口.可视 ＝ 真
.子程序 __启动窗口_创建完毕
.局部变量 左声道, 整数型
.局部变量 右声道, 整数型
拖放对象1.注册拖放控件 (取窗口句柄 ())
系统音量1.打开 (4)
滑块条1.最小位置 ＝ 系统音量1.取最小音量 ()
滑块条1.最大位置 ＝ 系统音量1.取最大音量 () ÷ 5
系统音量1.取音量 (左声道, 右声道)
滑块条1.位置 ＝ 左声道 ÷ 5
' -------------------------------------------------------------------------------------------------------------------------
' 来自这里 https://jingyan..com/article/0320e2c1db0a181b86507b61.html
' 注册那个命令是让窗口可以把文件拖放进来
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
列表框1.加入项目 (接收到的文件路径, )
' -----------------------------------------------------------------------------------------------------------------------------
' 把拖进来的文件加入到列表框里
.子程序 _图片框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
载入 (窗口1, _启动窗口, 真)
.子程序 _滑块条1_位置被改变
系统音量1.置音量 (滑块条1.位置 × 5, 滑块条1.位置 × 5)
' -------------------------------------------------------------------------------------------------------------
' 来自这里 https://jingyan..com/article/0320e2c1db0a181b86507b61.html

⑤ 云主机搭建网站与同步服务器

不会的，下面是配置方法
首先，找一个干净的地方，创建空文件夹，例如在我的机器上，配置：

安装好所需要的相关库文件：
* libevent-dev (2.0 or later )
* libcurl4-openssl-dev (1.0.0 or later)
* libglib2.0-dev (2.28 or later)
* uuid-dev
* intltool (0.40 or later)
* libsqlite3-dev (3.7 or later)
* libmysqlclient-dev (5.5 or later)
* libarchive-dev
* libtool
* libjansson-dev
* valac
* libfuse-dev

安装2个重要库：

其中第一个可以用./configure ; make ; make install 安装，第二个用cmake。

然后，安装以下的python库：（可以用easy_install安装，sudo apt-get install python-setuptools）

* [https://www.djangoproject.com/download/1.5.2/tarball/ django 1.5]
* [https://github.com/djblets/djblets/tarball/release-0.6.14 djblets]
* sqlite3
* simplejson (python-simplejson)
* PIL (aka. python imaging library, python-image)
* chardet
* gunicorn

为了方便管理，把目录结构调整成这个样子：

然后到下面这几个目录去下载对应的源码，注意版本对应，我这里选择的是3.1.3版本。

* [https://github.com/haiwen/libsearpc/tags]
* [https://github.com/haiwen/ccnet/tags]
* [https://github.com/haiwen/seafile/tags]
* [https://github.com/haiwen/seahub/tags]

解压：

tar xf

把seafhub放到上一级目录去

所以整个目录结构就变成这样了：

开始编译！！

libsearpc
cd libsearpc-${version}
./autogen.sh
./configure
make
make install

ccnet
cd ccnet-${version}
./autogen.sh
./configure --disable-client --enable-server # `export PKG_CONFIG_PATH=/usr/local/lib/pkgconfig` if libsearpc is not found
make
make install

seafile
cd seafile-${version}
./autogen.sh
./configure --disable-client --enable-server
make
make install

继续，利用ccnet-init和seaf-server-init初始化

ccnet-init --config-dir=/home/netlab/NSDI2015/SeaFile-3.1.3/ccnet --name=lzq8272587 --host=202.127.216.22 --port=10001

seaf-server-init -v -d /home/netlab/NSDI2015/SeaFile-3.1.3/seafile-data -p 12001 -P 8082

修改seahub下的setenv模板：
export CCNET_CONF_DIR=/home/netlab/NSDI2015/SeaFile-3.1.3/ccnet
export SEAFILE_CONF_DIR=/home/netlab/NSDI2015/SeaFile-3.1.3/seafile-data
export PYTHONPATH=/home/netlab/NSDI2015/SeaFile-3.1.3/seafile-server/seahub/thirdpart

保存，重命名，去掉尾部的template，然后运行run-seahub.sh.template

运行python manager.py syncdb

如果保存，检查是不是环境变量没有配置好，直接在终端里面输入上述三条指令配置即可。

进入seafile-server所在的目录，执行seafile-admin setup进行配置！

OK！

start， create admin：

天互数据

⑥ 求用C# visual studio2008 编写的服务器 客户端 文件同步程序（带源代码）。

到codefans下载 大把的

⑦ 请问谁有无线传感器网络时间同步的源代码谢谢了

关于无线传感器网络数据管理（Management of Data in Wireless Sensor Networks ）的NesC代码，里面有关于时间同步的，不过代码没有贴完，去看看吧！

⑧ AU3原码怎么实现与ftp服务器同步文件

首先去下载个FTPEx.au3

给段源码你研究吧

#include<FTPEx.au3>
#include<Array.au3>
Local$path
$server='192.168.1.1';服务器
$name='admin';用户名
$pass='admin';密码
$Port='21';端口
$path="c:a1乡村";远程路径，FTP的路径。
$RemoteDir=$path;远程根路径转换，不用管它。
$LocalDir="D:存储软件au3进行中FTP同步实验室1同步路径";本地路径，你想让文件下载到哪里？
$LocalDir=flocalDir($RemoteDir,$LocalDir);转换首目录，不用管
;~MsgBox(0,"$LocalDir",$LocalDir)

ftp($server,$name,$pass,$Port,$path,$RemoteDir)

Funcftp($server,$name,$pass,$Port,$path,$RemoteDir)
;说明：主要函数，搜索，下载
$Open=_FTP_Open('MyFTP');打开一个FTP会话

$Conn=_FTP_Connect($Open,$server,$name,$pass,0,$Port);连接到ftp服务器
_FTP_DirSetCurrent($Conn,$path)
$aFile=_FTP_ListToArrayEx($Conn,0,0);列目录(0=文件和目录,1=目录,2=文件)(格式0=mm/dd/yyyy,1=yyyy/mm/dd)

;~_ArrayDisplay($aFile)
;~MsgBox(0,"显示","共（"&$aFile[0][0]&"）个")
;~MsgBox(0,"$aFile[$i][0个]文件名",$aFile[0][0])
For$i=1To$aFile[0][0]
If$aFile[$i][2]=16And$aFile[$i][0]<>"."And$aFile[$i][0]<>".."Then
;~$path=$path&$aFile[$i][0]&""
;~MsgBox(0,"$path",$path&$aFile[$i][0]&"",$RemoteDir)
ftp($server,$name,$pass,$Port,$path&$aFile[$i][0]&"",$RemoteDir)
EndIf
If$aFile[$i][0]<>"."And$aFile[$i][0]<>".."And$aFile[$i][2]<>16Then
;检验
;~MsgBox(0,"",$aFile[$i][0])
$fname=$aFile[$i][0];文件名
$sync=ftpsync($LocalDir,$RemoteDir,$path,$fname)
;~MsgBox(0,"是否存在文件返回信息",$sync)
;~If$fname="PiView.mdb"Then
;~MsgBox(0,"$sync",$sync[0]&@LF&$sync[1])
;~EndIf
Select
Case$sync[0]=1;未发现文件
$ftp_download=_FTP_FileGet($Conn,$path&$fname,$sync[1],False);下载文件(True=覆盖False=不覆盖(默认))
;~MsgBox(0,$path&$fname,$sync[1])
Case$sync[0]=2;发现有同名文件
$ftpsize=_FTP_FileGetSize($Conn,$path&$aFile[$i][0])
$localsize=FileGetSize($sync)
;~MsgBox(0,"大小对比",$ftpsize&"-"&$localsize)
If$ftpsize<>$localsizeThen
;~MsgBox(0,"大小对比不成功",$ftpsize&"-"&$localsize)
;~MsgBox(0,"大小对比不成功",$path&$aFile[$i][0]&"-"&$sync)
$ftp_download=_FTP_FileGet($Conn,$path&$fname,$sync[1],False)
;~MsgBox(0,"$ftp_download",$ftp_download)
EndIf
CaseElse
MsgBox(0,"意外错误","搜索失败")

EndSelect
;~MsgBox(0,"次数",$aFile[$i][0])
EndIf

;~MsgBox(0,"显示","名="&$aFile[$i][0]&@CRLF&$aFile[$i][1]&@CRLF&$aFile[$i][2]&@CRLF&$aFile[$i][3]&@CRLF&$aFile[$i][4]&@CRLF&$aFile[$i][5])

Next
;$aFile[$i][0个]文件名
;$aFile[$i][1]文件大小
;$aFile[$i][2]文件属性
;$aFile[$i][3]文件修改日期-时间
;$aFile[$i][4]文件创作日期-时间
;$aFile[$i][5]文件通入日期-时间
$Ftpc=_FTP_Close($Open);关闭_FTP_Open打开的回话
EndFunc;==>ftp

;~FuncDownload
;~用途：下载一个FTP上的文件
;~$ftp_download=_FTP_FileGet($Conn,"111	est222.txt","e:au3_ftp	est222.txt",False);下载文件(True=覆盖False=不覆盖(默认))
;~EndFunc;==>ftp

Funcftpsync($LocalDir,$RemoteDir,$path,$fname);本地路径，远程根路径路径，变化中的远程路径，要下载的文件名。
Local$loc12
$loc12=_ArrayCreate("0","0")
;~说明:位置错误返回0,失败返回1,成功返回路径。主要用来判断是否有相同的文件。
IfFileExists($LocalDir)Then;看看本地是否存在，要是不存在就创建一个。
Else
DirCreate($LocalDir)
EndIf
Local$len=StringLen($RemoteDir)
Local$len1=StringLen($path)
$New=StringRight($path,$len1-$len)
;~MsgBox(0,"$New",$New)
;~MsgBox(0,"$fname",$fname)
IfFileExists($LocalDir&$New)Then
Else
;创建目录
DirCreate($LocalDir&$New)
EndIf
;~MsgBox(0,"需要判断是否存在的文件",$LocalDir&$New&$fname)
IfFileExists($LocalDir&$New&$fname)Then
;判断文件大小
$loc12[0]=2
$loc12[1]=$LocalDir&$New&$fname
;~Return$LocalDir&$New&$fname
;~MsgBox(0,"文件是否存在判定-是存在",$LocalDir&$New&$fname)

Else
;创建目录下载文件

;~Return1
$loc12[0]=1
$loc12[1]=$LocalDir&$New&$fname
EndIf
Return$loc12
EndFunc;==>ftpsync

FuncflocalDir($RemoteDir,$LocalDir)
;~说明：创建首目录
$LOG=StringSplit($RemoteDir,"")
If$LOG[0]<=1Then;如果呢~只有根目录盘那就是C盘根目录
Local$result=StringLeft($RemoteDir,1)
$LocalDir=$LocalDir&$result&"盘根目录"
Return$LocalDir
Else;如果不是那远程目录的最后一个文件夹，便是根目录的最后一个文件夹了。
$Loc1=$LOG[$LOG[0]-1]
$LocalDir=$LocalDir&$Loc1&""
Return$LocalDir

EndIf
EndFunc;==>flocalDir