access-vba
जाँच करें कि क्या टेबल मौजूदा डीबी में मौजूद है

.NET Framework C# Language excel-vba HTML MySQL Regular Expressions SQL Microsoft SQL Server Visual Basic .NET Language VBA

टिप्पणियों

बस इस कोड को एक सार्वजनिक मॉड्यूल के रूप में रखें जिसे किसी अन्य प्रक्रिया द्वारा बुलाया जा सकता है। कोड को कॉल करते समय, उस तालिका के नाम में जोड़ें, जिसे आप कोष्ठक के भीतर देखना चाहते हैं। कोड पहले से मौजूद है या नहीं, इस पर सही / गलत मान देता है। यह निर्धारित करने में सहायक होता है कि किसी तालिका को हटाने या शुद्ध करने की आवश्यकता है या अतिरिक्त कोड प्रदर्शन करने से पहले ही तालिका मौजूद है या नहीं।

उदाहरण

Public Function TblExists(sTable As String) As Boolean
    
    On Error Resume Next
    Dim tdf As TableDef
  
    Set tdf = CurrentDb.TableDefs(sTable)

    If Err.Number = 0 Then
        TblExists = True
    Else
        TblExists = False
    End If
End Function

एक सरल कार्य जो एक पंक्ति में उपयोग किया जा सकता है

Public Function TableExists(value as String) as Boolean

    On Error Resume Next
    TableExists = Len(CurrentDb.Tabledefs(value).Name & "") > 0

End Function

Modified text is an extract of the original Stack Overflow Documentation

के तहत लाइसेंस प्राप्त है CC BY-SA 3.0

से संबद्ध नहीं है Stack Overflow