请问DATAWINDOW是怎么部署到EASERVER上去的啊?

[gouzi]

如题

[poemlake]

请提问者说清楚一点啊，我才疏学浅，没看明白你的提问，帮你顶一下

[gouzi]

我是初学者，对于PB的分布式原理还不是很清楚。
我是说在EASERVER上怎么布署DATAWINDOWOBJECT，不可视组件是可以布署到服务器上去的，那DATAWINDOW怎么布署上去呢？是跟PBD一起布署上去的吗？

[poemlake]

高深，我也是初学者，没做过多层结构，晕~~~这回算栽了

[linda_gao]

如何部署EAServer with DataStore . i will give you very simple sample.

1. make sure you have EAServer installed, start it
2. select EAServer profile from menu tools , create easerver profile
3. in pb9 existing Workspace , new Target->EAServer component , follow the wizard
4. in activate event of this component ,
// Profile asa
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=EAS Demo DB V9;UID=dba;PWD=sql',ConnectOption='SQL_DRIVER_CONNECT,SQL_DRIVER_NOPROMPT'"

connect;

[linda_gao]

如何部署EAServer with DataStore . i will give you very simple sample.

-- server side ----
1. make sure you have EAServer installed, start it
2. select EAServer profile from menu tools , create easerver profile
3. in pb9 existing Workspace , new Target->EAServer component , follow the wizard
4. in activate event of this component ,
// Profile asa
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=EAS Demo DB V9;UID=dba;PWD=sql'"

connect;

in Deactivate event
disconnect;
5. new Datawindow , you can use department table
6. add new function , uf_test ,
datastore lds
blob lb_ds
lds = create datastore
lds.dataobject = 'd_dept'
lds.SetTransObject(sqlca)
lds.Retrieve()
lb_ds = lds.GetFullState()
return lb_ds

7. open project , make sure you have checked 'Include Unreferenced Objects in Consolidate PBD'
8. deploy it to your EAServer

--- client side ----
1. new application target ,
2. connection object , follow the wizard
3. new EAServer proxy wizard , select the package and component you deployed just now
4. click deploy toolbar item , deploy the proxy
5. new window , insert button and DW control, in click event of this button
n_genapp1_connction mycnn
n_genapp obj
blob lb_r
mycnn = create n_genapp1_connection
mycnn.connecttoserver()
mycnn.Createinstance(obj,'myPackageName/myComponentName')
lb_r = obj.uf_test()
dw_1.SetFullState(lb_r)
6. run it

[tommyhuanglei]

我晕楼上从哪里抄来的,
我看过有一本书上写的很详细,用了大约有20多页说明如何部署!
怎么给你回复呢?

[gouzi]

我是这样想的，在布署NVO对象到EASERVER上去的时候，是不是会把它所在的PBD一同布署到EASERVER上去，这样在调用NVO时，NVO就到服务器上的PBD上去找数据窗口对象。