CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 05 22:57:26

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : INTERNET EXPLOREUR 8,RESTREINTE DE L'EXECUTION DES SCRIPTS OU DES CONTRôLES ACTIVESX par cool26

RE : CONNEXION SQL - CRYSTAL REPORT par simou12

RE : INTERNET EXPLOREUR 8,RESTREINTE DE L'EXECUTION DES SCRIPTS OU DES CONTRôLES ACTIVESX par ghuysmans99

RE : INTERNET EXPLOREUR 8,RESTREINTE DE L'EXECUTION DES SCRIPTS OU DES CONTRôLES ACTIVESX par cool26

RE : INTERNET EXPLOREUR 8,RESTREINTE DE L'EXECUTION DES SCRIPTS OU DES CONTRôLES ACTIVESX par ghuysmans99

+ de logiciels à télécharger

1 464 910 membres
401 nouveaux aujourd'hui
15 045 membres club

Trouver une ressource

Trouvez une ressource parmi 40 095 codes, 1 303 022 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

MODIF DANS UNE BASE ACCESS

Information sur la source

Catégorie :Base de données Niveau : Débutant Date de création : 22/07/2002 Date de mise à jour : 22/07/2002 14:29:36 Vu : 6 930

Auteur : zbe

Ecrire un message privé

Note :

3,50 / 10

Commentaire sur cette source (0)

Ajouter un commentaire et/ou une note

Description

MODIFICATON DE DONNEE DANS UNE TABLE ACCESS.
COPIER COLER LE CODE DIRCTEMENT DANS UNE PAGE ASP

Source

<%
Dim rs
set rs = server.createObject ("ADODB.recordset")
Set conn = Server.CreateObject("ADODB.Connection")
connstring="DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & Server.MapPath(".") & "\nom de la base.mdb"
conn.Open connstring
sql = "select * from nom de la table "
rs.Open sql, conn, 3, 3
rs.movefirst
if trim(request("nom du champs 1 a modifier"))<>"" then
rs.fields("nom du champs 1 a modifier")=request("nom du champs 1 a modifier")
end if
if trim(request("nom du champs 2 a modifier"))<>"" then
rs.fields("nom du champs 2 a modifier")=request("nom du champs 2 a modifier")
rs.updateBatch
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect "nom de la pages.asp"
end if
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<form name="form1" method="post" action="">
<p>
<input type="text" name="ot" value="<% =request("nom du champs 1 a modifier") %>">
Premier champs</p>
<p>
<input type="text" name="desc" value="<% =request("nom du champs 2 a modifier") %>">
Deuxieme champs</p>
<p>
<input type="submit" name="action" value="modifier">
</p>
</form>
</body>
</html>

<%
Dim rs


set rs = server.createObject ("ADODB.recordset")


Set conn = Server.CreateObject("ADODB.Connection")


connstring="DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & Server.MapPath(".") & "\nom de la base.mdb"
conn.Open connstring 


	sql = "select * from nom de la table "
	rs.Open sql, conn, 3, 3
	rs.movefirst
	

	if trim(request("nom du champs 1 a modifier"))<>"" then
		rs.fields("nom du champs 1 a modifier")=request("nom du champs 1 a modifier")
		end if

		if trim(request("nom du champs 2 a modifier"))<>"" then
		rs.fields("nom du champs 2 a modifier")=request("nom du champs 2 a modifier")
		

		
		rs.updateBatch
	
	
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
	response.redirect "nom de la pages.asp"
end if

%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<form name="form1" method="post" action="">
  <p> 
    <input type="text" name="ot" value="<% =request("nom du champs 1 a modifier") %>">
    Premier champs</p>
  <p>
    <input type="text" name="desc" value="<% =request("nom du champs 2 a modifier") %>">
    Deuxieme champs</p>
  <p>
    <input type="submit" name="action" value="modifier">
  </p>
</form>
</body>
</html>