che, yo lo hago con 2 cositos.
Comparo la major, minor y revision de mi exe con las de un txt online.
Si no coinciden, UPDATE
Comparo la major, minor y revision de mi exe con las de un txt online.
Si no coinciden, UPDATE
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú'by Mr.Frog™
Public Function TextBetweenWords(ByRef strText$, ByRef strWord1$, ByRef strWord2$) As String
Dim lngPos1&, lngPos2&, lngStart&
lngPos1 = InStr(strText, strWord1)
If lngPos1 Then
lngStart = lngPos1 + LenB(strWord1) \ 2
lngPos2 = InStr(lngStart, strText, strWord2)
If iPosition2 Then
TextBetweenWords = Mid$(strText, lngStart, lngPos2 - lngStart)
End If
End If