主题：多用户并发函数问题

参考资料写的:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=32916&ID=4177&skin=1

为什么会报getdate未定义的错误??? 着急,请速回
select ISNULL(sqdate,GETDATE()) AS sqdate,preletter,len,ISNULL(number,0) AS number f rom getnumberid where tablename='" & tbname & "' and colname='" & clname & "'"

 

此主题相关图片如下：1.png

 

此主题相关图片如下：2.png

sqlserver

好像是sql server 2008 的

此主题相关图片如下：1.png

帮看看是哪问题,报未找到自定义函数的错误,有时候报数组越界异常,

Dim dr As DataRow
Dim t As Integer
Dim xh As Integer=0  

Dim numpre,numlen As String
Dim num As Integer   '
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "select GETDATE()"
sqldate=cmd.ExecuteScalar()  

Do
    cmd.CommandText = "select ISNULL(sqdate,GETDATE() ) AS sqdate,preletter,len,ISNULL(number,0) AS number f

ro m getnumberid where tablename='" & tbname & "' and colname='" & clname & "'"
    dt = cmd.ExecuteReader()   '读行记录
    If dt Is Nothing Then
        Exit Do
    End If
    dr = dt.DataRows(0)    '第一行
    numdate=dr("sqdate")
    numpre=dr("preletter")
    numlen=dr("len")
    num=dr("number")
    t=(sqldate-numdate).TotalDays
    If t>0 Then
        cmd.commandtext = "Up date getnumberid Set number =1,sqdate='" & sqldate & "' where tablename='" & tbname & "' and colname='" & clname & "' and ISNULL(number,0) =" & num
        xh=cmd.ExecuteNonQuery()
        num=1
        numdate=sqldate
    Else
        cmd.commandtext = "Upd ate getnumberid Set number =" & num+1  & " where tablename='" & tbname & "' and colname='" & clname & "' and ISNULL(number,0) =" & num
        xh=cmd.ExecuteNonQuery()
        num=num+1
    End If
   
    getbh=numpre.Trim() & "-" & CStr(numdate.year).SubString(2) & CStr(numdate.Month).PadLeft(2 ,"0")  & CStr(numdate.Day).PadLeft(2 ,"0")   & "-" &  CStr(num).PadLeft(numlen ,"0")
   
Loop While xh=0
Return getbh

此主题相关图片如下：2.png

应该不是表的问题吧?

此主题相关图片如下：1.png

 

此主题相关图片如下：1.png

 

此主题相关图片如下：3.png

此主题相关图片如下：2.png

11