当前位置: 代码迷 >> PB >> 见地是想动态创建数据窗口的导入导出模版!但没有成功! 特发此贴
  详细解决方案

见地是想动态创建数据窗口的导入导出模版!但没有成功! 特发此贴

热度:62   发布时间:2016-04-29 05:31:40.0
想法是想动态创建数据窗口的导入导出模版!但没有成功! 特发此贴
//功能:通过数据窗口创建特定的模版
string ls_xmlTempdata = ""

dw_data.modify('DataWindow.export.xml.usetemplate =""')
dw_data.modify('DataWindow.export.xml.headgroups ="1"')
dw_data.modify('DataWindow.export.xml.includewhitespace ="0"')
dw_data.modify('DataWindow.export.xml.metadatatype ="0"')
dw_data.modify('DataWindow.export.xml.savemetadata ="0"')
dw_data.modify('DataWindow.export.xml.template.comment=""')
dw_data.modify('DataWindow.export.xml.template.encoding="gb2312"')
dw_data.modify('DataWindow.export.xml.template.name="temp"')
ls_xmlTempdata = '<?xml version=~"1.0~" encoding=~"UTF-16LE~" standalone=~"no~"?>'
ls_xmlTempdata = ls_xmlTempdata + '<rs:data><z:row AAC001=~"aac001~" AAC002=~"aac002~" AAC003=~"aac003~" AAC006=~"aac006~" /></rs:data>'
//messagebox("", ls_xmlTempdata)
dw_data.modify('DataWindow.export.xml.template.xml="' + ls_xmlTempdata + '"')
dw_data.modify('DataWindow.import.xml.usetemplate="temp"')
------解决方案--------------------


string error_syntaxfromSQL, error_create

string new_sql, new_syntax

new_sql = 'SELECT emp_data.emp_id, ' + 'emp_data.emp_name ' + 'from emp_data ' + 'WHERE emp_data.emp_salary>45000'

new_syntax = SQLCA.SyntaxFromSQL(new_sql, 'Style(Type=Form)', error_syntaxfromSQL)

IF Len(error_syntaxfromSQL) > 0 THEN

        // Display errors

        mle_sfs.Text = error_syntaxfromSQL

ELSE

        // Generate new DataWindow

        dw_new.Create(new_syntax, error_create)

        IF Len(error_create) > 0 THEN

            mle_create.Text = error_create

        END IF

END IF

dw_new.SetTransObject(SQLCA)

dw_new.Retrieve()


------解决方案--------------------
AAC003=~~~"aac003~~~"   //总部多加'~' 这是转义符
  相关解决方案