Ξέρω έχει γίνει ξανα η ερώτηση στο παρελθόν. Λοιπόν θέλω να κάνω μια εφαρμογή ή και έτοιμη αν βρω που να αναγνωρίζει κλήσεις τηλεφωνικές . Πχ όπως σε καταστήματα εστίασης όπου κάνουμε τηλεφωνικές παραγγελίες κτλ. Το θέμα μου είναι πως θα πάρω το calerID απο το εκάστοτε τηλεφωνικό κέντρο . Δεν γνωριζω κ πολλά απο τηλεφωνικά κέντρα . Ευχαρηστώ

---

select DATEDIFF(dd,GetDate(),'20140731') AS EΠΟΜΕΝΕΣ_ΔΙΑΚΟΠΕΣ

Καλημέρα, Κάτι αντίστοιχο που έχω φτίαξει παίρνει το callerid από το τηλέφωνο την ώρα που χτυπάει και όχι από το τηλεφωνικό κέντρο.

Το τηλέφωνο είναι συνδεδεμένο σε ένα pc και κάθε φορά που χτυπάει γίνεται raise ένα CallNotification event ,τα στοιχεία που στέλνει τα διαχειρίζεσαι με TAPI. Αν γράψεις ποιο συγκεκριμένα τι ακριβώς θες να κάνεις ίσως να βοηθήσω περισσότερο.

Υπόψιν ότι ο κάθε κατασκευαστής έχει και δικό του TSPI(Telephony Service Provider Interface) με το οποίο επικοινωνεί το TAPI.

Το να φτίαξεις μία γενική εφαρμογή για όλες τις συσκευές είναι μάλλον αδύνατο.

Βασικά αυτό που θέλω είναι μια εφαρμογή αναγνώρισης κλήσεων όσο πιο απλή γίνεται . Πχ θα έχω μια βάση δεδομένων όπου πίσω θα καταχωρώ νέους τηλεφωνικούς αριθμούς (όνομα,επώνυμο....) και όταν ξανα κάνουν κλήση θα εμφανίζετε με το όνομα πλέον. Αν δεν είναι περασμένος στην βάση θα εμφανίζετε μόνο ο αριθμος. Τώρα το πρόβλημα μου είναι να πέρνω την πλήροφορία απο το τηλέφωνω πχ το callerid  δεν έχω ασχοληθεί με τηλεφωνικά κέντρα και δεν γνωρίζω αν μπορώ να κάνω κάτι γενικό απλά θέλω να υποστηρίζει όσο το δύνατον τα πιο συνηθισμένα .Απο όσο είδα κ έγω γίνονται με το TAPI το οποίο όπως σωστά λες επικοινωνεί με TSPI.
 

---

select DATEDIFF(dd,GetDate(),'20140731') AS EΠΟΜΕΝΕΣ_ΔΙΑΚΟΠΕΣ

Για να υποστηρίζεις τα ποίο συνηθισμένα όπως λές πρέπει να κάνεις έρευνα αγοράς για το ποία έχουν τις μεγαλύτερες πωλήσεις στην Ελλάδα και από τις πωλήσεις τους να αποφασίσεις ποία και πόσα είναι τα ποίο συνηθισμένα.

Κατόπιν να επικοινωνήσεις με τις εταιρείες για να σου στείλουν τα TSPI , συνήθως δέν είναι δωρεάν, και έπειτα να αρχίσεις να σχεδιάζεις την εφαρμογή.

Τα TSPI δεν χωρίζονται ανά εταιρεία αλλά ανα μοντέλο συνήθως.

Ok καταλαβαίνω. Υπάρχει κανένα source σαν παράδειγμα στο internet για το πως παίζει με το TAPI  για να ξεκινήσω ? (κι ας μην με καλύπτει 100%)

---

select DATEDIFF(dd,GetDate(),'20140731') AS EΠΟΜΕΝΕΣ_ΔΙΑΚΟΠΕΣ

Option Strict Off

Imports TAPI3Lib

Imports TAPI3Lib.TAPI_EVENT

Public Class GetCallID


    Public gobjTapi1 As ITTAPI
    Public gobjAddress1 As ITAddress
    Public lngCallNot As Integer
    Public gCall As ITCallInfo
    Public WithEvents clTapi As TAPI
    Public objCollAddresses As ITCollection

    Public Const MyTapiEvents As Integer = TE_TAPIOBJECT Or TE_CALLNOTIFICATION Or TE_ADDRESS

    Public Const LINECALLORIGIN_OUTBOUND = &H1
    Public Const LINECALLORIGIN_INTERNAL = &H2
    Public Const LINECALLORIGIN_EXTERNAL = &H4
    Public Const LINECALLORIGIN_UNKNOWN = &H10
    Public Const LINECALLORIGIN_UNAVAIL = &H20
    Public Const LINECALLORIGIN_CONFERENCE = &H40
    Public Const LINECALLORIGIN_INBOUND = &H80


    Protected Overrides Sub OnStart(ByVal args() As String)

        Try
            gobjTapi1 = New TAPI
            gobjTapi1.Initialize()
            gobjTapi1.EventFilter = MyTapiEvents
            clTapi = gobjTapi1
            objCollAddresses = gobjTapi1.Addresses
            Dim myaddress As ITAddress
            For Each myaddress In objCollAddresses

                If myaddress.AddressName = "Name of Telephony Provider" Then

                    lngCallNot = gobjTapi1.RegisterCallNotifications(myaddress, True, True, TAPI3Lib.TapiConstants.TAPIMEDIATYPE_AUDIO, 1)

                End If
            Next myaddress

        Catch ex As Exception
           "Error Message"
        End Try

    End Sub

    Protected Overrides Sub OnStop()
        Try
            gobjTapi1.UnregisterNotifications(lngCallNot)
            lngCallNot = Nothing
            gCall = Nothing
            gobjTapi1 = Nothing
            gobjAddress1 = Nothing
            objCollAddresses = Nothing
            clTapi = Nothing

        Catch ex As Exception
           "Error Message"
        End Try


    End Sub


    Private Sub TapiEvents(ByVal TapiEvent As TAPI3Lib.TAPI_EVENT, ByVal pEvent As Object) Handles clTapi.Event

        Try
            Select Case TapiEvent

                Case TE_CALLNOTIFICATION
                    gCall = pEvent.Call
                    Select Case gCall.CallInfoLong(CALLINFO_LONG.CIL_ORIGIN)
                        Case LINECALLORIGIN_EXTERNAL
                                 Dim CallerID as string = gCall.CallInfoString(CALLINFO_STRING.CIS_CALLERIDNUMBER)
.
.
.
                    End Select


            End Select

        Catch ex As Exception
            "Error Message"
        End Try

    End Sub

Αυτό είναι ένα παράδειγμα του πώς να πάρεις το CallerID από μία τηλεφωνική συσκευή.

Στο internet υπάρχουν πολλά sites για να βρείς πληροφορίες για το TAPI,καλύτερα να αρχίσεις από το msdn

http://msdn.microsoft.com/en-us/library/ms734273(VS.85).aspx

thanks ..

---

select DATEDIFF(dd,GetDate(),'20140731') AS EΠΟΜΕΝΕΣ_ΔΙΑΚΟΠΕΣ