我不明白,你威慑什么有两个参数,一个参数就行啊:
函数:
Dim cmd As New SQLCommand Dim dt As Datecmd.ConnectionName =args(0)cmd.CommandText = "Select GetDate()"dt = cmd.ExecuteScalar()Return dt
调用:
dim ls as row=tables("数据").Currentls("操作日期")=Functions.Execute("ftime")