易语言设置共享源码

系统结构:A2W,ShareAdd,DelShare,NetShareAdd,NetShareDel,MultiByteToWideChar,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ A2W
           |  |
           |  |------ ShareAdd
           |  |
           |  |------ DelShare
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   NetShareAdd
           |  |
           |  |---[dll]------   NetShareDel
           |  |
           |  |---[dll]------   MultiByteToWideChar

调用的DLL命令:

.DLL命令 NetShareAdd, 整数型, "netapi32.dll", "NetShareAdd"
    .参数 ServerName, 整数型
    .参数 level, 整数型
    .参数 buf, SHARE_INFO_2
    .参数 parmerr, 整数型

.DLL命令 NetShareDel, 整数型, "netapi32.dll", "NetShareDel"
    .参数 ServerName, 整数型
    .参数 ShareName, 整数型
    .参数 dword, 整数型

.DLL命令 MultiByteToWideChar, 整数型, , "MultiByteToWideChar"
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型