FONCTION POUR GÉNÉRER UN JAVACRIPT D'OUVERTURE D'UNE IMAGE EN POPUP À LA BONNE TAILLE

Function getPopupJavascript(ByVal psUrl As String) As String

Dim vsRetour As String

Try
Dim voWebClient As New System.Net.WebClient
Dim voBitmap As New System.Drawing.Bitmap(voWebClient.OpenRead(psUrl))
Dim viImageHeight As Integer = voBitmap.Height + 25
Dim viImageWidth As Integer = voBitmap.Width + 20
vsRetour = "javascript:window.open('" & txtUrl.Text & "','popup','width=" & viImageWidth.ToString() & ",height=" & viImageHeight.ToString() & ",status=no,menu=no,scrollbars=auto,location=no,resizable=no');"
Catch ex As Exception
vsRetour = "javascript:alert('L\'url n'est pas une image')"
End Try

Return vsRetour

End Function

30 septembre 2005 21:06:37 :

Remplacement d'une variable

• CRÉATION D'UN FICHIER EXCEL 2007 EN UTILISANT OPENXML EST XSL
• EXÉCUTER UN SCRIPT VB.NET LORS D'UNE TRANSFORMATION XSLT (V2)
• CRÉATION D'UN FICHIER EXCEL EN UTILISANT OPENXML
• ANALYSE STATIQUE DE CODE AVEC FXCOP
• LIBRAIRIE DE TRADUCTION

• PAGINATION CONTRÔLE REPEATER ASP.NET AVEC UN DATASET
• CRYSTAL REPORT AVEC L'ASP.NET ( GESTION DES ÉTATS)
• OPTIMISATION DE LA SERIALISATION JSON POUR LES LIST<T>
• CLASSE WORDDOCUMENT ET WORDTEMPLATEDOCUMENT POUR LES VERSION 97-2007
• UPLOAD FILE

• FONCTION SIMPLE POUR ALTERNER LES COULEURS DES LIGNES D'UN TABLEAU
• CALENDAR POPUP CUSTOMISÉ POUR DEMI JOURNÉE
• EFFET DE POPUP
• EXECUTION DE CODES ASP À LA VOLÉE
• .NET2 - REMPLIR UN DROP EN FONCTION D'UN AUTRE GRACE AU CLIENTCALLBACK