您现在的位置:主页 > 技术中心 > web服务器

将SQL语句转换为符合VB.NET格式字符串

来源:网络整理 责任编辑:admin 发表时间:2013-07-01 11:54 点击:

实习中时常需要将写好的SQL语句嵌入到VB.NET的函数中,例如将下列SQL:

-- Get Mother Lot Common Info
select c.customerlotnumber -- customer lot#
,c.containername --Amkor lot#,
,amk.description
,inh.txndate indate--s_time
,outh.txndate  outdate -- e-time
,rs.resourcename resourcename
,emp.fullname
-- ,outh.qty
from container c,historymainline hml,workflowstep wfs
,operation opt,movehistory outh,moveinhistory inh
,RESOURCEDEF rs
,amkorwwoper amk
,employee emp
where c.splitfromid =(select containerid from container where
containername='ML6410058461')
and hml.reversalstatus=1
and c.containerid=hml.containerid
and hml.operationid=opt.operationid
and hml.workflowstepid=wfs.workflowstepid
and hml.operationid=opt.operationid
and hml.historymainlineid=inh.historymainlineid(+)
and hml.historymainlineid=outh.historymainlineid(+)
and HMl.RESOURCEID=RS.RESOURCEID(+)
and (outh.historymainlineid is not null or inh.historymainlineid is not null)
and opt.amkorwwoperid=amk.amkorwwoperid
and hml.employeeid=emp.employeeid
order by c.containername,to_number(wfs.sequence),inh.txndate,outh.txndate
转换如下形式为:
String sql in VB.NET
sql = "select c.customerlotnumber -- customer lot# " & vbCrLf _  
  & ",c.containername --Amkor lot#, " & vbCrLf _  
  & ",amk.description " & vbCrLf _  
  & ",inh.txndate indate--s_time " & vbCrLf _  
  & ",outh.txndate  outdate -- e-time " & vbCrLf _  
  & ",rs.resourcename resourcename " & vbCrLf _  
  & ",emp.fullname " & vbCrLf _  
  & "-- ,outh.qty " & vbCrLf _  
  & "from container c,historymainline hml,workflowstep wfs " & vbCrLf _  
  & ",operation opt,movehistory outh,moveinhistory inh " & vbCrLf _  
  & ",RESOURCEDEF rs " & vbCrLf _  
  & ",amkorwwoper amk " & vbCrLf _  
  & ",employee emp " & vbCrLf _  
  & "where c.splitfromid =(select containerid from container where " & vbCrLf _  
  & "containername='ML6410058461') " & vbCrLf _  
  & "and hml.reversalstatus=1 " '..

同事Tracy告诉我一个快速方法,仅仅利用UltraEdit的查找替换功能(<>号不填,仅为引用号),

查找:< ^p >

替换:< " & vbCrLf _ ^p & " >

替换的第一个"号前不可省去空格,然后填上头尾即可,^p代表回车符,也就是将回车符展开,是不是很有趣的技巧?

    发表评论
    请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
    评价:
    表情:
    用户名: 验证码:点击我更换图片
    ?? - ?? - ÝřŝžľŘÝź - TAGąęÇŠ - RSSśŠÔÄ - ??
    Copyright © 2004-2024 上海卓卓网络科技有限公司