不改代码,CS转BS

nxhujiee 2019-08-27

展开全文

通过satrda的浏览器插件，可以直接把CS程序转换成BS运行，包括.net、C++、PB、delphi、VB等的CS程序都可以转化。在浏览器中输入自己配置的地址后，插件会自动下载上传的CS应用，并加载到浏览器中。
运行效果如图：

设置方法

1.下载SATRDA

最新版本可在QQ群：345559891 下载

2.运行服务端

运行示例server目录下面的satserver.exe

3.配置

打开浏览器，输入http://127.0.0.1:5555/admin 显示登录窗口

用户名和密码都输入satrda，点击登录进入后台管理。点击WebApp，进入WebApp配置界面

默认已经设置好了一条记录,这条记录表示浏览器url地址中url是 http://ip:port/satrda，网页标题是SATRDA组件，上传的应用名称是 test。后面会有详细说明。

4.程序修改

浏览器插件会把相应的参数通过命令方式传到CS程序中，在CS程序中解析命令得到相应的浏览器参数，调用api就可以把程序附加到浏览器中，satrda提供了vb,pb,c++,c#,delphi等的调用示例，可以在下载的示例中查看。

以下代码将把当前窗口加载到当前的网页中：

Delphi代码

procedure TForm2.FormCreate(Sender: TObject);
var
server : string;
db:string;
begin
if ParamCount > 0 then
begin
parseCommand(ParamStr(1));
SatWebApp_Attach(hWebApp,Handle,0);
end;

PB代码：

//如果在浏览器打开，此函数会把窗口附加到浏览器
n_api.of_webapp_attach(handle(this), false)

C#代码：

//在main函数中添加
static void Main(string[] args)
{
if (args.Length > 0)
{
parseCommand(args[0]);
}

//需要附加到浏览器的窗口中添加
private void Form1_Load(object sender, EventArgs e)
{
if ( SatRDA.WebPtr != (IntPtr)(0) )
{
SatRDA.SatWebApp_Attach(SatRDA.WebPtr, this.Handle, 0 | SatRDA.WS_CHILD );
}
}

VB代码

VBWebApp Me.hwnd

C++代码

//在窗口打开时添加,of_parseCommand函数具体见定义
	of_parseCommand();
	HMODULE h = LoadLibraryA("satrda.dll");
	fWebApp_Attach webapp_attach = (fWebApp_Attach)GetProcAddress(h,"SatWebApp_Attach");
	webapp_attach(gl_web,m_hWnd,WEBAPP_FULL);

具体可以参考下载示例的代码，修改完成后可以打包程序。

5.升级工具上传程序

通过升级工具上传自己的CS程序，浏览器可以自动检测到文件变化，文件和服务端不一致，可以下载更新，并运行最新程序

1.把应用程序放到指定的文件夹，双击红框1位置，弹出框选择该文件夹，升级工具会检测该文件夹下的所有文件，并显示在列表中。
2.双击红框2位置，选择升级包输出的文件夹
3.填写上传地址，格式为http://ip:port，ip为服务器ip或者域名，port为服务器端口号
4.应用程序名，最好以英文命名。假设应用名称为 test 最后上传的升级包会到服务器public/appupdate/test目录下面。
5.填写版本号，主程序检查更新时会得到版本号，程序可以自己判断是否进行更新。
6.双击列表的某项可以改变其属性，控制升级过程。除以下三个列表项，其它不需要修改。（运行项非常重要，至少选中一个可以运行的文件，否则升级后程序无法运行）
7.点击开始生成，生成安装包。安装包会输出到指定的输出目录中
8.点击开始上传，会上传安装包到服务端目录。 public/appupdate/应用名称