Screen shot

Question

ok j'ai repris la source de quelqu'un .
Peu importe le programe prennais des Screenshot et le envoyais malheureusement il n'&#233;tait pas automatique. Donc je l'ai modifier. Il marche tres bien en localhost mais lorsqu'il est sur local il y a une erreur avec un stream loading si quelqu'un pourais m'aider 

L'erreur se produit ou il y a le 
-------------------------------------------------------------------------------------
Public Function Array2Picture(aBytes() As Byte) As StdPicture
'On Error Resume Next
    Dim oIPS As IPersistStream
    Dim oStream As IStream
    Dim hGlobal As Long
    Dim lPtr As Long
    Dim lSize As Long
    Dim Hdr As PictureHeader
    Set Array2Picture = New StdPicture                     ' Create a new empty picture object
    Set oIPS = Array2Picture                               ' Get the IPersistStream interface
    lSize = UBound(aBytes) - LBound(aBytes) + 1            ' Calculate the array size
    hGlobal = GlobalAlloc(GHND, lSize + Len(Hdr))          ' Allocate global memory
    If hGlobal Then
        lPtr = GlobalLock(hGlobal)                         ' Get a pointer to the memory
        Hdr.Magic = PictureID                              ' Initialize the header
        Hdr.Size = lSize                                   ' Initialize the header
        MoveMemory ByVal lPtr, Hdr, Len(Hdr)               ' Write the header
        MoveMemory ByVal lPtr + Len(Hdr), aBytes(0), lSize ' Copy the byte array to the global memory
        GlobalUnlock hGlobal                               ' Release the pointer
        Set oStream = CreateStreamOnHGlobal(hGlobal, True) ' Create a IStream object with the global memory
        oIPS.Load oStream                                  ' Load the picture from the stream
        Set oStream = Nothing                              ' Release the IStream object
    End If
End Function

L'informatique c'est cool Mais Une erreur peu etre fatale.

cs_Jack · Answer

Salut
Refait ta phrase, je comprends pas :
Il marche tres bien en localhost mais lorsqu'il est sur local ...

Vala
Jack
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

cs_Jack · Answer

Et puis franchement, il y a d'autres m&#233;thodes de faire des copies d'&#233;cran ...
Cherche sur le site, il y a des sources comme celle-ci http://www.vbfrance.com/code.aspx?id=17837

Vala
Jack
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

cs_Ulysse3 · Answer

oui je siais qu'il ya a d'autre facon mais sa ses les plus facile sa me tentait pas d'avoir un gros module. et se que je veux dire c'est que (locahl host) ses que lorsque jouvre les deux programme sur mon ordi sa marche mais lorcque c'esr en r&#233;seau local sa mrache pas.
L'informatique c'est cool Mais Une erreur peu etre fatale.

Screen shot

3 réponses

Discussions similaires