Where " & StrWhere 27 End If 28 StrSql = StrSql & StrOrder & ") As Tbltemp)" 29 If StrWhere <> "" Then 30 StrSql = StrSql & " And " & StrWhere 31 End If 32 StrSql = StrSql & StrOrder 33 End If 34 GetPageSql = StrSql ''''返回sql语句 35 End Function 36 Response.Write(GetPageSql("Message","MessageID",10,1,0,"")) 37 %>
上一页 [1] [2] [3] |