主题：SQLLoad问题呢

sql语句那里【其它条件】写在第一个select from那里，而不是写在最后

Dim e As Object =Args(0)'e
Dim st1 As String =Args(1)'表名
Dim r3 As Integer =Args(2)'行数
Dim st2 As String =Args(3)'条件
Dim r1 As Integer = (Page - 1) * r3  + 1
Dim r2 As Integer = Page * r3
Dim sql As String
If st2>"" Then   
    sql = "Select * From (Select Row_Number() Over(Order by ID desc) As 序号, * from " & st1 & " where " & st2 & ") As a "
    sql = sql & " Where 序号 >= " & r1 & " And 序号 <= " & r2   
Else   
    sql = "Select * From (Select Row_Number() Over(Order by ID desc) As 序号, * from " & st1 & ") As a "
    sql = sql & " Where 序号 >= " & r1 & " And 序号 <= " & r2
End If

'Output.Show(sql)
DataTables(e.Form.Name & "_table1").SQLLoad(sql)

函数可以添加参数，把条件参数传递进去就行啊

http://www.foxtable.com/webhelp/scr/1486.htm