Comment creer un ocx pour appel dans page html

Version imprimable

Voir 40 message(s) de cette discussion en une page

04/07/2006, 17h22
minette

Comment creer un ocx pour appel dans page html

Désolée si ça été posté mais ,
j'ais fais un code en standard exe en vb6 qui me permet d'automatiser
la fusion et publipostage word !

mais la ou je coince c'est quand je voudrais mettre ce programme en ocx et l'appeller dans une page web avec les balise <OBJECT> !

Comment faire ? pour le CLSID aussi ?
Aidez moi svp !, j'attend vos conseils ,
dur d'avoir la documentation simple dessus :oops:

Merci
06/07/2006, 02h45
zazaraignée
Salut

Si tout ton code tient dans la feuille principale,
- ouvre ton projet (exe)
- ouvre un nouveau projet (nouvelle instance de VB, par le menu Démarrer) en choisissant Contrôle ActiveX dans la fenêtre de démarrage de VB
- copie tout tes objets présents sur la feuille de ton projet sur la feuille (sans bordures) de ton projet ActiveX
- ensuite copie le code de ton projet vers la feuille de code de ton projet ActiveX
- il ne reste plus qu'à tester et empaqueter en ActiveX.
Si, par contre, ton projet initial prend plus d'une feuille, des fonctions complèxes dans des modules, etc., il ne sera pas possible d'utiliser l'astuce que je viens de te donner... Si c'est le cas, donne plus de précisions sur ton projet.
06/07/2006, 10h52
minette
Citation:
Envoyé par zazaraignée

Salut

Si tout ton code tient dans la feuille principale,

ouvre ton projet (exe)
ouvre un nouveau projet (nouvelle instance de VB, par le menu Démarrer) en choisissant Contrôle ActiveX dans la fenêtre de démarrage de VB
copie tout tes objets présents sur la feuille de ton projet sur la feuille (sans bordures) de ton projet ActiveX
ensuite copie le code de ton projet vers la feuille de code de ton projet ActiveX
il ne reste plus qu'à tester et empaqueter en ActiveX.

Si, par contre, ton projet initial prend plus d'une feuille, des fonctions complèxes dans des modules, etc., il ne sera pas possible d'utiliser l'astuce que je viens de te donner... Si c'est le cas, donne plus de précisions sur ton projet.
Merci j'ai essayé l'astuce mais je ne comprends pas tres bien !!!
(dsl un peu d'eclaircissement stp)
Aussi comment je recupere le guid pour mettre le clsid de l'activeX dans mon code html?
11/07/2006, 10h29
minette
Bonjour c'est encore moi !
J'ais reussi grace a l'astuce de zazaraignee a empaqueter mon control en ocx pour le web !!
je met le .CAB et mon .ocx dans mon repertoire du serveur web !
j'appelle l'ocx dans la balise object et il affiche bien le programme dans la page web !

Le problem il me met une erreur 91 bloc with non defini et ne peut creer l'objet .
Quand je click sur debug il me met cette ligne
Code:

1 2 Set oMainDoc = oApp.Documents.Add(model, False)
en jaune !!

Auriez vous une idee pour regler ce problem svp :oops: ??? !!!
11/07/2006, 12h51
SfJ5Rpw8
il y as quoi dans ta variable model ...?

essai de l'afficher..
Code:

1 2 3 msgbox model Set oMainDoc = oApp.Documents.Add(model, False)

Citation:
Envoyé par bbil
il y as quoi dans ta variable model ...?

essai de l'afficher..
Code:

1 2 3 msgbox model Set oMainDoc = oApp.Documents.Add(model, False)
Oui en fait ma variable model contient le chemin d'accès au document modele .dot que je recupere depuis un common dialogue sans soucis !!!
Code:

1 2 3 4 5 6 7 8 9 10 11 12 Private Sub Command3_Click() Dim essai With CommonDialog1 .Filter = "Fichiers texte (*.dot)|*.dot" .ShowOpen If .FileName = "" Then Exit Sub End If Text2 = .FileName End With model = Text2 End Sub
je n'arrive pas a comprendre cette erreur run time 91 : Object variable or with block not set

Merci pour l'aide

12/07/2006, 14h37
SfJ5Rpw8

as tu essayer le message box .. voir si model représenter bien le nom de fichier ( avec chemin accessible de puis le poste ou s'exécute l'Ocx) ?
12/07/2006, 14h50
minette

Citation:

Envoyé par bbil

as tu essayer le message box .. voir si model représenter bien le nom de fichier ( avec chemin accessible de puis le poste ou s'exécute l'Ocx) ?

En fait a dire vrai je sais pas comment faire l'ocx !
en gros ce code a été fais en standard exe et il fonctionne parfaitement donc model contient donc bien le chemin d'accès attendu !
Ensuite j'ai utiliser l'astuce de zazaraignee pour passer a l'ocx par simple enregistrement du code standard en control activex !!
tout se passe bien jusqua ce que le lance dans la page web avec object ...ocx.cab , il s'affiche bien , je lui met le chemin du dot document model et quand je click fusion il genere l'erreur 91 object or with block not set et me ramene a la ligne du set de mon programme !!

je suis coincée car je ne maitrise pas les subtilités des objets et activeX
14/07/2006, 18h04
zazaraignée

Salut

Désolée, j'étaits en Ontario, Ste-Cathrine et des noces à l'italienne (on a mangé!), ensuite une douche et un bon coup de soleil à Niagara Falls, Retour au Québec, Rivière-Beaudette (c'est collé sur l'Ontario) pour des noces d'or Québéco-Franco-Italiennes: on a encore mangé... De retour à Rimouski, les boîtes et le déménagement qui n'est pas fini... Je prends le temps de siroter ma Rickard's Red et de regarder ce qui ce passe sur le forum...

Le problème vient peut-être du fait que l'application (la page Web et l'OCX) se trouvent sur un serveur et que l'utilisateur ouvre un fichier en local sur sa machine... Faudra déterminer si l'application traite côté serveur ou coté client... et faire avec. Il est où le fichier modèle?
15/07/2006, 11h57
minette

Citation:

Envoyé par zazaraignée

Salut

Désolée, j'étaits en Ontario, Ste-Cathrine et des noces à l'italienne (on a mangé!), ensuite une douche et un bon coup de soleil à Niagara Falls, Retour au Québec, Rivière-Beaudette (c'est collé sur l'Ontario) pour des noces d'or Québéco-Franco-Italiennes: on a encore mangé... De retour à Rimouski, les boîtes et le déménagement qui n'est pas fini... Je prends le temps de siroter ma Rickard's Red et de regarder ce qui ce passe sur le forum...

Le problème vient peut-être du fait que l'application (la page Web et l'OCX) se trouvent sur un serveur et que l'utilisateur ouvre un fichier en local sur sa machine... Faudra déterminer si l'application traite côté serveur ou coté client... et faire avec. Il est où le fichier modèle?

En tout cas Zaza tu as due etre trop bien, j'imagine , et je reve du moment ou je profiterais de quelques jours comme ça :roll:

Oui la page web et L'ocx je les met dans un repertoire sur un serveur web ,
et le fichier model se trouve coté client! l'application est traittée en fait coté client car sur le serveur je ne peux y mettre microsoft word.
Je l'ai simplement en local ( word ) !
Ais je repondu a ta question zaza ?
Sinon l'erreur persiste , ne dois je pas faire des variables et proprietés et methodes publiques ?
Est ce un probleme d'initialisation?
comment ?
aidez moi SVP !
Merci
17/07/2006, 15h21
minette

Pourriez vous m'aider s'il vous plait !!!

Enfin je suppose que le temps vous manque !
Bon ça fait tache mais je suis coincée ...:oops:

Meme pour des idees conseils je suis preneuse svp à l'aide :( :cry:
17/07/2006, 18h09
SfJ5Rpw8

essai de vérifier si ton ocx as bien accés au fichier modéle... un truc du genre

Code:

msgbox dir(model)
18/07/2006, 01h14
zazaraignée

Salut

Je viens juste de me souvenir qu'un ActiveX se télécharge sur l'ordi client avec la page Web et tout l'tintouin qui vient avec... Donc, il ne devrait pas normalement y avoir de problème de ce côté.

En attendant, vérifie ce que bbil t'a proposé. Des fois, on ne sait jamais... C'est peut-être un problème d'accès au répertoire, permissions et droits d'accès, si tu vois ce qu'on veut dire.
18/07/2006, 09h04
minette

Merci de vos reponses Zazaraignée et BBil.
J'ais essayé comme vous m'avez dit et le message box me donne bien mon fichier dot : essai9.dot ( c'est ce qu'il affiche )

Le fichier est situé dans un repertoire sur mon poste dans
C:\Documents and Settings\Administrateur\Bureau\sid_Java\document DOT\essai9.dot

Le message box affiche : essai9.dot

L'erreur persiste : Erreur d'execution '91' :
Variable objet ou variable bloc with non définie !

Je ne comprend plus rien :(
18/07/2006, 09h20
SfJ5Rpw8
modifie la ligne
Code:

1 2 3 Set oMainDoc = oApp.Documents.Add( "C:\Documents and Settings\Administrateur\Bureau\sid_Java\document DOT\" & model, False)
histoire de voir si l'erreur disparait... (ensuite faudra trouver un moyen de donner ce répertoire..)
18/07/2006, 09h42
minette
Citation:
Envoyé par bbil

modifie la ligne

Code:

1 2 3 Set oMainDoc = oApp.Documents.Add( "C:\Documents and Settings\Administrateur\Bureau\sid_Java\document DOT\" & model, False)

histoire de voir si l'erreur disparait... (ensuite faudra trouver un moyen de donner ce répertoire..)
Je viens de recompiler le control avec la ligne Set que tu m'as proposée :
Mais hélas l'erreur persiste !
Peut etre que je compile mal?
Que se passe -t'il? Ais je manquée un aspect important de l'activeX?
ma tete surchauffe la :( :oops:
18/07/2006, 10h02
SfJ5Rpw8
je suis peu être parti sur une mauvaise piste... peu-tu vérifier que l'objet oAPP est bien initialisé... en rajoutant par exemple
Code:

1 2 MsgBox oApp.Name
avant la ligne qui provoque l'erreur 91...

Citation :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
Public Sub Command1_Click()
Dim essai
    With CommonDialog1
      .Filter = "Fichiers texte (*.dot)|*.dot"
      .ShowOpen
      If .FileName = "" Then
         Exit Sub 
     End If
     Text1 = .FileName
    End With
    model = Text1
End Sub

18/07/2006, 10h33
minette

Le

Code:

Msgbox oApp.Name

N'affiche rien , il passe directement a l'erreur !
Et pourtant l'autre msgbox affiche bien le fichier DOT !

Serait ce la l'erreur ?

Merci de votre aide ...;)

Citation:
Envoyé par jmfmarques
Citation :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 Public Sub Command1_Click() Dim essai With CommonDialog1 .Filter = "Fichiers texte (*.dot)|*.dot" .ShowOpen If .FileName = "" Then Exit Sub End If Text1 = .FileName End With model = Text1 End Sub
J'ais meme supprimé ce test mais toujours la meme erreur !
Merci

Voir 40 message(s) de cette discussion en une page