长图拼接app软件对于喜欢在手机上进行图片处理的用户来说必备可少，使用长图拼接app可以将多张不同的图片拼接合成为一张张不同风格类型的长图文，用户可以随时在线进行截图拼接，一键轻松添加特效，自定义拼图。
'组合查询之核心：拼接字符串 '功能：定义查询条件，定义返回集，定义排序方式 '平台：Windows 2000 Server + IIS5.0 + SQL Server 2000 '语言：VBScript '作者：Cheery_Ke '***********Start************ '**************读取变量************* . . . seaLastUpdTime = Request("seaLastUpdTime1")&"-"&Request("seaLastUpdTime2")&"-"&Request("seaLastUpdTime3") returnItem = Request("ReturnItem")'******个人设定要返回的字段 'Response.Write returnItem '***********拼接字符串*************************** If returnItem " Then SQL = Select ComID,ComName, & returnItem & From ClientInfo Where ISInva = 0" Else SQL = Select ComID,ComName From ClientInfo where IsInva = 0" End If If seaComName " Then SQL = SQL & And ComName Like '%"&seaComName&"%'" End If If seanexus1 " Then SQL = SQL & And nexus like '%"&seanexus1&"%'" End If If seanexus2 " Then SQL = SQL & And nexus like '%"&seanexus2&"%'" End If If seaComType " Then SQL = SQL & And ComType = '"&seaComType&"'" End If If seaComProv " Then SQL = SQL & And ComProv = '"&seaComProv&"'" End If If seaTimeFrist11 " Then seaTimeFrist1 = seaTimeFrist11&"-"&seaTimeFrist12&"-"&seaTimeFrist13 SQL = SQL & And TimeFrist > '"&seaTimeFrist1&"'" End If If Request(seaTimeFrist1) " Then seaTimeFrist1 = Request(seaTimeFrist1) SQL = SQL & And TimeFrist > '"&seaTimeFrist1&"'" End If If seaTimeFrist21 " Then seaTimeFrist2 = seaTimeFrist21&"-"&seaTimeFrist22&"-"&seaTimeFrist23 SQL = SQL & And TimeFrist < '"&seaTimeFrist2&"'" End If If Request(seaTimeFrist2) " Then seaTimeFrist2 = Request(seaTimeFrist2) SQL = SQL & And TimeFrist < '"&seaTimeFrist2&"'" End If If seaNearTime11 " Then seaNearTime1 = seaNearTime11&"-"&seaNearTime12&"-"&seaNearTime13 SQL = SQL & And TimeNear > '"&seaNearTime1&"'" End If If Request(seaNearTime1) " Then seaNearTime1 = Request(seaNearTime1) SQL = SQL & And TimeNear > '"&seaNearTime1&"'" End If If seaNearTime21 " Then seaNearTime2 = seaNearTime21&"-"&seaNearTime22&"-"&seaNearTime23 SQL = SQL & And TimeNear < '"&seaNearTime2&"'" End If If Request(seaNearTime2) " Then seaNearTime2 = Request(seaNearTime2) SQL = SQL & And TimeNear < '"&seaNearTime2&"'" End If If seaAppTime11 " Then seaAppTime1 = seaAppTime11&"-"&seaAppTime12&"-"&seaAppTime13 SQL = SQL & And AppTime > '"&seaAppTime1&"'" End If If Request(seaAppTime1) " Then seaAppTime1 = Request(seaAppTime1) SQL = SQL & And AppTime > '"&seaAppTime1&"'" End If If seaAppTime21 " Then seaAppTime2 = seaAppTime21&"-"&seaAppTime22&"-"&seaAppTime23 SQL = SQL & And AppTime < '"&seaAppTime2&"'" End If If Request(seaAppTime2) " Then seaAppTime2 = Request(seaAppTime2) SQL = SQL & And AppTime < '"&seaAppTime2&"'" End If If Request("seaLastUpdTime1") " Then // seaLastUpdTime0 = seaLastUpdTime1&"-"&seaLastUpdTime2&"-"&seaLastUpdTime3 SQL = SQL & And LastUpdTime > '"&seaLastUpdTime&"'" End If If Request(seaLastUpdTime1) " Then //seaLastUpdTime0 = Request(seaLastUpdTime0) SQL = SQL & And LastUpdTime > '"&seaLastUpdTime&"'" End If If Session("Pop") = 1" Then AdminName = Session("UserName") SQL = SQL & And (OurSales Like '%"&AdminName&"%' Or nexus Like '%w%') Order By & Order Else Response.Write SQL SQL = SQL & Order By & Order 'Order设定排序方式 End If 'Response.Write SQL