Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Mémoire insuffisante erreur d'exécution 7 MSN

1 réponse
Avatar
hackoo
Bonjour, j'ai essayer de faire marcher ce code qui enregistre l'historique de MSN mais j'ai eu cette erreur quand je compile le programme "Mémoire insuffisante erreur d'exécution 7".
Alors SVP si qlq un a une idée sur cette erreur Merci pour votre aide !
le code est le suivant:
'-----------------------------------------------------------------------------------------------------------------------
Option Explicit
Private WithEvents objMessenger As MessengerAPI.Messenger

Private Sub Form_Load()
Set objMessenger = New MessengerAPI.Messenger
End Sub

Private Sub objMessenger_OnIMWindowDestroyed(ByVal pIMWindow As Object)
Dim MsgrIMWindow As IMessengerConversationWnd
Dim MsgrContacts As IMessengerContacts
Dim i As Long
Dim fil As Integer
Dim strTmpText As String

Set MsgrIMWindow = pIMWindow
Set MsgrContacts = MsgrIMWindow.Contacts

If MsgrContacts.Count = 0 Then
strTmpText = "test"
Else
strTmpText = MsgrContacts.Item(0).SigninName
End If

fil = FreeFile()
Open "C:\test\" & strTmpText & ".log" For Append As #fil
Print #fil, "______________________________________________________"
Print #fil, "Le " & Date & " a " & Time
Print #fil, "Contact dans la conversation (" & MsgrContacts.Count & "): "
For i = 0 To MsgrContacts.Count - 1
Print #fil, " - " & MsgrContacts.Item(i).FriendlyName & "<" & MsgrContacts.Item(0).SigninName & ">"
Next
Print #fil, "---------------------------------------------------------------------------------------"
Print #fil, MsgrIMWindow.History
Print #fil, "__________________________________________________________________" & vbCrLf
Close #fil
End Sub
'----------------------------------------------------------------------------------------------------------

1 réponse

Avatar
jeanmarcnoury
On 28 avr, 11:54, hackoo wrote:
Bonjour, j'ai essayer de faire marcher ce code qui enregistre l'historiqu e de
MSN mais j'ai eu cette erreur quand je compile le programme "Mémoire
insuffisante erreur d'exécution 7".
Alors SVP si qlq un a une idée sur cette erreur Merci pour votre aide !



Hello,

Il s'agit d'un problème connu et qui ne touche pas seulement VB. Ce
n'est pas un problème de langage ou de code mais de configuration.

La réponse est dans ce thread:
http://forums.fanatic.net.nz/lofiversion/index.php/t12885.html

Note: j'avais le même symptome que toi et en utilisant la solution
proposée (la manip avec le group policy), tout fonctionne. Je suis
sous XP Pro. La manip est différente sous XP Home, cf. l'article.

Cordialement,


--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
FAQ VB: http://faq.vb.free.fr/
mailto: remove '_no_spam_' ;