Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

9 commentaire(s) de dimitriusai sur des sources sur tout CodeS-SourceS

Le : 03/07/2008 11:23:58
Source : [.NET2] WRAPPER POUR API WINDOWS TERMINAL SERVICES.
rien n'est levé, le try catch ne détecte rien du tt. Le programme plante simplement.  Dans la boucle suivante.

Try
            For i As Integer = 0 To MysqlResult1.Count - 1
                Dim wts As New WTSHelper()
                Dim count As Integer = 0
                Dim hServer As IntPtr = wts.Open(MysqlResult1(i).Item(0).ToString)
                MsgBox(MysqlResult1(i).Item(0).ToString)

                For Each sess As Integer In wts.EnumAllSessionsId(hServer)

                    Dim sess_ext As WTSLib.WTS_SESSION_INFO_EXT = wts.GetSessionInfos(hServer, sess)

                    sess_ext.ToString()
                    Dim tab As New ArrayList
                    Dim tab2(3)
                    tab2(0) = sess_ext.WTSUserName
                    tab2(1) = sess_ext.WTSClientName
                    tab2(2) = sess_ext.WTSSessionId
                    tab2(3) = statuschng(sess_ext.WTSConnectState)
                    'tab.Add(tab2)
                    'DataGridView1.Rows.Add(tab)

                Next
                wts.Close(hServer)
            Next

        Catch ex As Exception
            MsgBox("catch" & ex.Message)
        End Try

J'ai réutilisé ta dll en vb.net


Le : 03/07/2008 10:33:36
Source : [.NET2] WRAPPER POUR API WINDOWS TERMINAL SERVICES.
Ok merci. Je vais abandonner cette solution car de mon coté cela plante après un ou deux serveurs et les infos ne sont pas tjrs correct alors que le handle est bien ouvert et fermé comme tu l'expliques bien dans ta source.

Je ne vois vraiment pas d'où vient le problème.


Le : 03/07/2008 10:17:15
Source : [.NET2] WRAPPER POUR API WINDOWS TERMINAL SERVICES.
Après quelques heures de travail, j'ai réussi à faire fonctionner wts, sur un serveur, mais mon but est de tester plusieurs serveurs, je fais donc une boucle afin de récupérer ces informations (dans le domaine bien sur ^^) mais il y a un plantage de wts après quelques serveurs.
Qu'en penses-tu ? le fais tu sur plusieurs serveurs ou sur un serveur unique ?
Connais tu unes autre solution afin de récupérer ce genre d'information.

Merci d'avance et Cordialement.(USAI.D)


Le : 02/07/2008 12:02:58
Source : [.NET2] WRAPPER POUR API WINDOWS TERMINAL SERVICES.
Hello, j'ai testé ton appli et fait une exception qui est levée.
Et ce lors de cette ligne ci

WTSLib.SessionTimeInfos sess_t = wts.GetTimeInfo(hServer, sess, sess_ext.WTSConnectState);

Qui permet d'avoir les informations de temps.

Une exception non gérée du type 'System.ExecutionEngineException' s'est produite dans WTSLib.dll
Si tu as une idée

Merci d'avance


Le : 18/05/2008 01:17:19
Source : [.NET2] FILESYSTEMWATCHER, DELEGATE
J'ai découvert une erreur, ou un bugg.
J'ai instancés plusieurs fois votre classe afin de pouvoir checker les .bmp .jpg et .png
et ils me font tous un event, alors que le jpg m'en créée deux !! bizard non ?

qqun a il déja eu ce bugg ? solution ?

Merci d'avance


Le : 08/05/2008 10:45:35
Source : CRÉER UN RACCOURCI INTERNET (.url)
Voici Comment je fais en VBNET(Visual Studio 2008)

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Permet de trouver le chemin du bureau de l'utilisateur
        Dim chemin As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
        chemin = chemin + "\Nomdemonurl.url"
        Dim objWriter As New System.IO.StreamWriter(chemin, False, System.Text.Encoding.Default)
        Dim MysqlResult2 As New ArrayList()
        objWriter.WriteLine("[InternetShortcut]")
        objWriter.WriteLine("URL=http://monlien.html")
        objWriter.WriteLine("IDList=")
        objWriter.WriteLine("IconFile=C:\monicone.ico")
        objWriter.WriteLine("HotKey = 0")
        objWriter.WriteLine("IconIndex = 0")
        objWriter.WriteLine("[{000214A0-0000-0000-C000-000000000046}]")
        objWriter.WriteLine("Prop3=19,2")
        objWriter.Close()
        FileClose(1)
    End Sub


Le : 11/03/2008 14:37:49
Source : APPLICATION AUTO UPDATE IN VB.NET
En effet, clickOnce ne permet pas d'avoir un répertoire dans program files mais le cache au fin fond des documents et settings.

Je vais donc essayer d'utiliser ta solution "christian_grandjean" .
Petite question : est il possible par exemple d'updater simplement un exe.
Je m'explique, j'ai une simple application donc mes utilisateurs n'ont que l'executable.
Est il possible de mettre à jour grace à ta solution mon executable ou permet il juste l'update de fichier de cfg, ou autre.

Merci d'avance


Le : 11/02/2008 14:37:42
Source : [.NETV2] CLASSCOM - CLASSE DE COMMUNICATION EN RÉSEAU SIMPLIFIÉE GÉRANT LE MULTICLIENT, 2 EN 1 CLIENT ET SERVEUR - CLASS SOCKET
Voilà la solution:

Private Sub Srv_ConnectionRequestAccepted(ByRef SocketLocal As Socket) Handles Srv.ConnectionRequestAccepted
        Try
            'Création du thread
            Dim myNewThread As New Thread(AddressOf Me.test)

            ' Dim myNewThread As New System.Threading.Thread(AddressOf test)
            myNewThread.Name = "Thread ID:" & ThreadID
            ThreadID += 1
            'Invoke(New testDeleg(AddressOf test), New Object() {socket})
            'Démarrage du Thread
            myNewThread.Start(SocketLocal)
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

    End Sub


Le : 11/02/2008 10:27:08
Source : [.NETV2] CLASSCOM - CLASSE DE COMMUNICATION EN RÉSEAU SIMPLIFIÉE GÉRANT LE MULTICLIENT, 2 EN 1 CLIENT ET SERVEUR - CLASS SOCKET
Merci pour la classe.
Je suis à la recherche d'une facon pour créer des threads afin de créer un nouveau client, chaque fois que le serveur recoit une demande de connection.

    'ici le serveur reçoit la demande de connexion et l'accepte en créant le client ClassComm SrvReceive
    Private Sub Srv_ConnectionRequestAccepted(ByRef sck As System.Net.Sockets.Socket) Handles Srv.ConnectionRequestAccepted

        SrvReceive = New ClassComm(sck)
        While SrvReceive.MsgCount < 1
        End While
        Dim cm As ClassComm.CommMessage = SrvReceive.ReadNextMsg
        MySQL_SELECT(cm.Message)

    End Sub

Comment faire pour créer un thread avec seulement ceci

SrvReceive = New ClassComm(sck)
        While SrvReceive.MsgCount < 1
        End While
        Dim cm As ClassComm.CommMessage = SrvReceive.ReadNextMsg
        MySQL_SELECT(cm.Message)

? Merci d'avance



1


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,172 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.