同步器源碼

① 如何用按鍵精靈實現 多窗口同步操作 .. 有源碼請發源碼.. 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