AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 12 02:30:11
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 !

17 commentaire(s) de alosamoelle sur des sources sur tout CodeS-SourceS

Le : 26/03/2009 12:11:48
Source : DRAG AND DROP IMAGE INTERNET
Bonjour et merci pour la note,
si tu veux faire directement le drop sur la picturebox il faut faire ainsi.
tu autorise le drop dans le load de la form

        PictureBox1.AllowDrop = True

  et ensuite c'est comme le textbox

Private Sub PictureBox1_DragEnter1(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles PictureBox1.DragEnter
        e.Effect = DragDropEffects.Copy
    End Sub

  Try


            ' recupere la donnée
            Dim strFiles
            'Variable qui contiendra un tableau contenant les fichiers


            'on recupere le drop dans le tableau
            strFiles = e.Data.GetData(DataFormats.FileDrop)
            strFiles = e.Data.GetData(DataFormats.Html)


            ' on recupere le début de l'adresse de l'image
            Dim débutadresse = Split(strFiles, "src=")
            ' ensuite on ne prend que la source
            ' prend le guillemet
            Dim guillemet = Chr(34)
            Dim adresse = Split(débutadresse(1), guillemet)
            ' prend le nom de l'image pour l'enregistrement
            Dim imaged = Split(adresse(1), "/")
            Nomdelimage = imaged(UBound(imaged))
            PictureBox1.Image = RecupFichierImageInternet(adresse(1))
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub


Voilà bonne prog.


Le : 14/03/2009 22:39:57
Source : TRANSPARENCE TEXTBOX ET PICTUREBOX
Trés sympa comme code.

Le : 25/02/2009 22:59:07
Source : APPLICATION GPS POUR POCKET PC
Ça a l'air pas mal mais un zip serait le bienvenue pour éviter de refaire tous les boutons, listbox........
Merci

Le : 28/11/2008 07:03:41
Source : IMPRESSION D'UNE LISTVIEW EN GÉNÉRANT UN FICHIER EXCEL
Bonjour,
je trouve dommage d'utiliser Excel juste pour imprimer une listview car pour une appli cela oblige l'utilisateur à avoir excel.
De plus suivant les pc la pagination risque d'être différente.

Le : 02/10/2008 18:50:14
Source : EXEMPLE DE SYNCHRO MULTI-THREAD (DÉBUTANT)
Bonjour,
je voulais regarder ce code mais je pense qu'il a été fait en vb 2008?
car je n'arrive pas a l'ouvrir en vb 2005.

Le : 29/08/2008 17:44:53
Source : BARBOUILLAGE(BRUSH)
Sympa, il manque juste un apercu de la taille de la brosse

Le : 17/05/2008 08:19:22
Source : [.NET2] LECTEUR DE FICHIER TOMTOM BINARY (.OV2)
Bien mais ne fonctionne pas bien m?me avec ton exemple, la longitude de ta ligne 11 n'est pas bonne.
En comparant avec poiedit et d'autres fichiers ov2 c'est la m?me chose des longitudes ne sont pas bonnes.
Un peu complique ta m?thode pour remettre ta valeur hexa en decimal.
tu peux faire directement ceci
Function Tranformeendecimale(ByVal a)
        Dim tempo As Integer = 0
        For i As Integer = 1 To Len(a)

            Dim c As String = Mid(a, i, 1)
            If c = "A" Then c = 10
            If c = "B" Then c = 11
            If c = "C" Then c = 12
            If c = "D" Then c = 13
            If c = "E" Then c = 14
            If c = "F" Then c = 15
            tempo += c * 16 ^ (Len(a) - i)

        Next
        Tranformeendecimale = tempo

    End Function

Le : 10/05/2008 18:41:00
Source : NAVIGATEUR WEB MODIFIÉ
Je met 6 pour encourager la bonne volonté, je suis d'accord avec FREMYCOMPANY mais je trouve que 4 est un peu sévère car il est mis dans le niveau débutant et il a au moins le mérite d'avoir été fait.

Le : 26/03/2008 17:28:30
Source : EXTRACTION CODE HTML, EDITION DYNAMIQUE DE FICHIER HTML (MARCHE EN VB6)
Ta source a l'air sympa mais je n'arrive pas a l'ouvrir avec vb2005?

Le : 16/03/2008 20:46:29
Source : DRAG AND DROP IMAGE INTERNET
Merci Kite37, tu as raison je suis un peu fainéant pour mes variables et ce n'est pas une bonne chose, promis je vais essayer de faire attention.


1 2


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Appels d'offres

Comparez les prix Nouvelle version


Call of Duty 4: Modern Warfare pour Windows
Entre 55€ et 55€


Visiter le guide achat

Photothèque Nouveau !

Photo pretty girlsPhoto plage de nudistes
Photo pretty teenage girlsPhoto gift of light

Visiter la photothèque


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 : 11,045 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é.