|
|
| Auteur |
Message |
|
|
 |
kitana Enregistrement
Genre: Femme Inscrit le: 12 Mai 2003 Sujets: 21 Messages: 41 Localisation: 972 madinina
|
Posté le: 05 Déc 2004 22:14 Sujet du message: asp et vbscript |
|
|
slt
je fais un formulaire en asp ou il ya a 4 boutons submit .
donc ce que je voulais faire c t qu'en fonction du bouton cliqué l'action du form change et renvoie l'user sur la page correspondante.
en javascript ca a l'air de fonctionner mais bon pas comme je veux car g ete obligee de faire quatre fonctions. mais bon c pas la le prob
donc mon code javascript je l'ai traduit en vbscript et la rien ne fonctionne. je suis novice en asp et surtout ne vbscript donc est ce que kelk'un peut m'aider svp.
voici le code:
| Code: |
<%
sub verif1()
dim but
but = document.formfilm.modifier.value
if but = "modifier"then
document.formfilm.action="modifier.asp";
end if
end sub
sub verif()
dim but
but = document.formfilm.afficher.value
if (but = "afficher")then
document.formfilm.action="afficher.asp";
end if
end sub
sub verif2()
dim but
but = document.formfilm.supprimer.value
if (but = "supprimer")then
document.formfilm.action="supprimer.asp";
end if
end sub
sub verif3()
dim but
but = document.formfilm.ajouter.value
if (but = "ajouter")then
document.formfilm.action="ajouter.asp";
end if
end sub
%>
<%
dim connexion,sql
set connexion= server.CreateObject("ADODB.Connection")
strcon= "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Inetpub\wwwroot\Cinema.mdb;" & _
"Persist Security Info=False"
connexion.open strcon
set jeu= server.CreateObject("ADODB.Recordset")
sql="select * from Films where dispo=1"
jeu.open sql,connexion,2,2,1
%>
<form name="formfilm" method="post">
<table>
<tr><td>Choix du film:</td>
<td>
<select name="film" id="commandeID">
<% while not jeu.EOF%>
<option value="<% response.write jeu("titre") %>"><% response.write jeu("titre") %></option>
<%
jeu.movenext
Wend
%>
</select>
</td>
</tr>
</table>
<center>
<input type="submit" value="afficher" onClick="<%verif()%>" name="afficher">
<input type="submit" value="modifier" onClick="<verif1()" name="modifier" >
<input type="submit" value="supprimer" onClick=" verif2()" name="supprimer" >
<input type="submit" value="ajouter" onClick=" verif3()" name="ajouter" >
</center>
</form>
|
_________________ Sista kitana! Jah bless you |
|
| Revenir en haut |
|
 |
aka Shiva Charter 
Genre: Homme Inscrit le: 25 Mai 2003 Sujets: 39 Messages: 4586 Localisation: ---------------------
|
Posté le: 05 Déc 2004 22:37 Sujet du message: asp et vbscript |
|
|
Tu as été virée de Jussieu?  |
|
| Revenir en haut |
|
 |
Jârvis Assistant 

Genre: Homme Inscrit le: 28 Fév 2004 Sujets: 148 Messages: 13656 Localisation: Sur la route ...
|
Posté le: 05 Déc 2004 22:44 Sujet du message: asp et vbscript |
|
|
| aka Shiva a écrit: | Tu as été virée de Jussieu?  |
Pourquoi ? _________________ "Sachant que tu n'es pas noir, qui es-tu ?" |
|
| Revenir en haut |
|
 |
kitana Enregistrement
Genre: Femme Inscrit le: 12 Mai 2003 Sujets: 21 Messages: 41 Localisation: 972 madinina
|
Posté le: 05 Déc 2004 23:21 Sujet du message: asp et vbscript |
|
|
| aka Shiva a écrit: | Tu as été virée de Jussieu?  |
hein.? pkoi tu me dis ca?
et voila l'erreur qe ca me donne
| Citation: | Erreur d'exécution Microsoft VBScript error '800a01a8'
Objet requis: 'document'
/tpasp/films.asp, line 68
|
_________________ Sista kitana! Jah bless you |
|
| Revenir en haut |
|
 |
aka Shiva Charter 
Genre: Homme Inscrit le: 25 Mai 2003 Sujets: 39 Messages: 4586 Localisation: ---------------------
|
Posté le: 05 Déc 2004 23:29 Sujet du message: asp et vbscript |
|
|
| kitana a écrit: | | aka Shiva a écrit: | Tu as été virée de Jussieu?  |
hein.? pkoi tu me dis ca? |
vas tout simplement sur les sites spécialisés. Sauf si quelqu'un peut répondre à ta question. J'étais juste là pour le délire.  |
|
| Revenir en haut |
|
 |
kitana Enregistrement
Genre: Femme Inscrit le: 12 Mai 2003 Sujets: 21 Messages: 41 Localisation: 972 madinina
|
Posté le: 06 Déc 2004 01:54 Sujet du message: asp et vbscript |
|
|
c'est la premiere fois qe je mefais jeter de volcreole mince alors  _________________ Sista kitana! Jah bless you |
|
| Revenir en haut |
|
 |
aka Shiva Charter 
Genre: Homme Inscrit le: 25 Mai 2003 Sujets: 39 Messages: 4586 Localisation: ---------------------
|
Posté le: 06 Déc 2004 02:00 Sujet du message: asp et vbscript |
|
|
| kitana a écrit: | c'est la premiere fois qe je mefais jeter de volcreole mince alors  |
sub verif()
dim but
but = subjet.volcreole.question.sens
if (but = "sens")then
subject.volcrelole.action="question.asp";
end if
end sub |
|
| Revenir en haut |
|
 |
kitana Enregistrement
Genre: Femme Inscrit le: 12 Mai 2003 Sujets: 21 Messages: 41 Localisation: 972 madinina
|
Posté le: 06 Déc 2004 02:31 Sujet du message: asp et vbscript |
|
|
ca passe pas masis merci qd mm _________________ Sista kitana! Jah bless you |
|
| Revenir en haut |
|
 |
|
|
|
 |
|