ADP中如何使用MSSQL中的自定義函數啊？

lzx-shmily

如題，謝謝!

tmtony

sql 语句中可直接引用函数啊
如果是ADP的话

lzx-shmily

我是想在VBA中使用，比如：欄位= dbo.create_check_no(Me.盤點月份)
dbo.create_check_no是函數

zhuyiwen

SQL的自定义函数只能使用在SQL语句、存储过程或其它SQL自定义函数中。

如果要在VBA中调用SQL自定义函数，只能这样做：(当然这个自定义函数只能是标量函数)

1. ' ADP
   
2. dim sql as string
   
3. dim rs as ADODB.Recordset
   
4. 
   
5. sql = "SELECT dbo.create_check_no(" & Me.盤點月份 & ")"  '注：函数的参数为数值类型
   
6. set rs = currentproject.Connection.Execute(sql)
   
7. if not rs.eof() then
   
8.    欄位 = rs(0)
   
9. end if
   
10. 
    
11. rs.close
    
12. set rs=nothing

复制代码