Informatique
	EXPERTISE, CONSEILS, FORMATION, ACCOMPAGNEMENT AU CHANGEMENT Solution Intranet, Extranet et Internet Accompagnement et formation au travail collaboratif Accès à la rubrique

Formation
	FORMATION SALARIES ETUDIANTS APPRENTIS. Bureautique, Internet, Sciences de la vie, Mathématique, Physiques Aéronautique Accès à la rubrique

Biologie
	RECHERCHE Biologie cellulaire Biologie moléculaire Génétique Accès à la rubrique

Aéronautique
	PILOTE PRIVE D'AVION Enseignant - aéronautique - aéromodélisme en savoir plus

FAIRE UN UPDATE (MISE A JOUR)

dim strid_prof, strid_cours, strid_classe
dim querystr4
strid_prof = request.form("formid_prof")
strid_cours = request.form("formintitule")
strid_classe = request.form("formclasse")
strintitule_anc = request.form("formintitule_anc")
strclasse_anc = request.form("formclasse_anc")

Set Cndb5 = Server.CreateObject("ADODB.Connection")
cnDBQ ="DRIVER={Microsoft Access Driver (*.mdb)};"&"DBQ="&Server.MapPath("..")&"/basedonnee/bd1.mdb;"
Cndb5.Open cnDBQ

queryStr4 = "UPDATE table_cle SET id_prof = ("&strid_prof&") , id_cours = ("&strid_cours&") , id_classe = ("&strid_classe&") WHERE id_prof = ("&strid_prof&") AND id_cours = ("&strintitule_anc&") AND id_classe = ("&strclasse_anc&")"

Cndb5.Execute(queryStr4)
Cndb5.close
%>

Si les valeurs sont des chaînes de caractère, il faut rajouter des '

queryStr4 = "UPDATE table_cle SET id_prof = ('"&strid_prof&"') , id_cours = ('"&strid_cours&"') , id_classe = ('"&strid_classe&"') WHERE id_prof = ('"&strid_prof&"') AND id_cours = ('"&strintitule_anc&"') AND id_classe = ('"&strclasse_anc&"')"

  Internet
  Extranet
  Intranet

Développement
- Scripts Asp
- Script PHP
- Script CSS

Logiciels

Articles

LOI n°2004-575 du 21 juin 2004

eric desrentes : Informations légales