AspSmartUpload sur IIS6 : modifier taille maximale des fichiers

- Stopper IIS 6 ( net stop w3svc) afin de pouvoir modifier la metabase.
- Ouvrir le fichier metabase.xml situé dans c:\windows\system32\inetsrv
- A la ligne AspMaxRequestEntityAllowed ; modifier la valeur ( attention aux exces ! )
- Relancer IIS6 ( net start w3svc )
- Redemarrer le serveur
( ps : attention , la metabase est un fichier sensible )


AspSmartUpload et IIS6 sous W2003 : LoadLibrary a echoue via Regsvr32

Apres de longues recherches voici la solution .
Si vous tentez d'enregistrer aspSmartUpload.dll sur un serveur W2003 vous aurez invariablement le message :
LoadLibrary("C:\WINDOWS\SYSTEM32\aspSmartUpload.dll") a échoué. Le module spécifié est introuvable

Solution : AspSmartUpload a besoin de la dll vb5 de microsoft pour tourner correctement.


Publicité


Utiliser un IF au sein d'un GridView

Voici une méthode permettant d'utiliser des conditions sur un champ issu d'une table d'une base de données et d'afficher différents résultats au sein de la section <asp:templatefield> d'un Gridview.
Vous utilisez une zone <asp:templatefield> dans un Gridview pour le personnaliser.
Le problème est d’utiliser une condition sur un champ de la table associée au Gridview.

Par exemple :

Dans votre table vous avez un champ « etat » qui indique numériquement l'état d'une commande.
etat = 0 - Commande en cours
etat= 1 - Commande Envoyée
etat= 2 - Commande Annulée
Vous souhaiteriez afficher à un endroit de votre Gridview une indication sur la commande affichée.
Supposons, que vous ayez un champ label qui assure l'affichage de cette donnée.
Vous ne pouvez pas faire quelque chose du genre :
<% if (DataBinder.Eval(Container, "DataItem.etat") =0 then %>
<asp:Label id ="encours" runat="server" text="Commande en cours"></asp:label>
<% else %>
....
<% end if%>


Comment installer des ActiveX

Pour utiliser un composant serveur, il faut tout d'abord en créer une instance. Cette opération se réalise par l'intermédiaire du code suivant :

Créer une instance d'objet

<% Set monObjet=server.CreateObject("ADODB.Connection") %>
(Composant que l'on utilise régulièrement pour la connexion à une base de données)
Créer une instance d'object avec son identifiant de classe
Vous pouvez créer un objet à l'aide de son identifiant (base de registre)
<OBJECT RUNNAT=Server ID=Pageliees CLASSID="Clsid:6DE1-11CF-87A7-444553540000">
</OBJECT>

Gérer les erreurs

Pour savoir si l'instance d'un objet a bien été créée, et éviter une erreur éventuelle, vous pouvez utiliser le code suivant :

<% On error resume next
Set monObjet=server.CreateObject("ADODB.Connection")
if isObject(monObject)=false then
' la méthode a échouée... Gestion de l'erreur
end if
%>


Arrondir un nombre

En ASP il est vraiment très pratique d’arrondir un nombre. Il suffit simplement d’utiliser la commande Round :

<%=Round(nb, ar)%)

Où « nb » est le nombre à arrondir et « ar » est le nombre indiquant combien de positions à la droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur est omise, la valeur retournée est un entier c'est-à-dire un nombre sans décimales.


SimageUtil : Changer la taille d une image en ASP

Voici, simplifié, le code ASP qui permet de retailler une image en ASP :

  Set myImage = Server.CreateObject("SImageUtil.Image")
  myImage.OpenImageFile("/repertoire/"&rs("image")&")")
  myImage.ChangeSize 100,70
  myImage.SaveJpgFile "repertoire1/"&nom_image&".jpg", 75
  myImage.Close()


Publicité


Uploader en asp sans composant.

Upload de fichiers sur serveur sans besoin de composant serveur.

Code ...


ABCPDF :Generer des fichiers PDF par ASP a la volee

Voici un exemple de fonctionnement :

Set theDoc = Server.CreateObject("ABCpdf3.Doc")
theDoc.FontSize = 96
theDoc.AddText "bonjour"
theDoc.Save "c:\mypdfs\simple.pdf"


Set theDoc = Server.CreateObject("ABCpdf3.Doc")
theDoc.AddGrid
theDoc.Color = "255 0 0"
theDoc.Width = 10
theDoc.Rect.Position 100, 200
theDoc.Rect.Width = 400
theDoc.Rect.Height = 500
theDoc.FrameRect
theDoc.Save "c:\mypdfs\coordinates.pdf"


Comment envoyer un mail grace a Cdonts ?

Voici le code source de l'envoi :

Dim MAILCDO
Set MAILCDO = Server.CreateObject("CDONTS.NewMail")
MAILCDO.To = "info@votredomaine.com"
MAILCDO.From = "info@votredomaine.com"
MAILCDO.Subject = "Sujet"
MAILCDO.Body = "CorpsDuTexte"
MAILCDO.Importance = 1
MAILCDO.BodyFormat=0
MAILCDO.MailFormat=0
MAILCDO.Send
set MAILCDO=Nothing


Telechargement de ASPUPLOAD

Vous pouvez telecharger ASPUPLOAD ici