iversonlee

导航

 

ls_sql= ""
ls_syntax = sqlca.SyntaxFromSQL(ls_sql,'style(type=grid)',ls_error)
if len(ls_error) >0 then
  messagebox('Error','SyntaxFromSQL Error:~r'+ls_error)
else
  dw_.create(ls_syntax,ls_error)
  if len(ls_error) >0 then
    MessageBox("Error", "Create have these errors: ~r" + ls_error)
  end if
  ls_syntax = dw_.Object.DataWindow.Syntax
  luo_string.append(ls_syntax)
  luo_string.Replace("in('')","in(:aa)")
  luo_string.Replace(':aa)"',':aa)" arguments=(("aa", stringlist))')
  ls_syntax = luo_string.tostring()
  dw_.create(ls_syntax,ls_error)
  dw_.settransobject(sqlca)
  dw_.retrieve(aa)

end if

posted on 2021-01-04 13:45  iversonlee  阅读(90)  评论(0)    收藏  举报