begin process at 2012 02 14 03:53:28
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Base de données

 > INSÉRER DES DONNÉES D'UN CHAMP DE FORMULAIRE DS UNE TABLE - SQLSERVER

INSÉRER DES DONNÉES D'UN CHAMP DE FORMULAIRE DS UNE TABLE - SQLSERVER


 Information sur la source

Note :
6 / 10 - par 2 personnes
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Base de données Niveau :Débutant Date de création :16/05/2002 Date de mise à jour :16/05/2002 10:35:00 Vu :12 197
Auteur : Legion

Ecrire un message privé
Site perso
Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

 Description

Simple et efficace...

Source

  • 'DEBUT
  • 'Declaration des variables
  • Dim Name
  • Dim Email
  • Dim Commentaire
  • 'récup des valeur de champs en supposant que les champs se nomment name, email et commentaire.
  • Name = Request.Form("name")
  • Email = Request.Form("email")
  • Commentaire = Request.Form("commentaire")
  • 'Connection
  • Set objConn = Server.CreateObject("ADODB.Connection")
  • objConn.Open "Votre-Provider;" &_
  • "User ID = Votre-User-ID;" &_
  • "Pwd = Votre-Pass;" &_
  • "Initial Catalog = votre-catalogue;" &_
  • "Initial File Name = votre-fichier"
  • 'Requête
  • objConn.Execute ("INSERT INTO votre-table (nom, email, commentaire) VALUES ('" & Name & "', '" & Email & "', '" & Commentaire & "')")
  • 'Fermeture
  • objConn.Close
  • Set objConn = Nothing
  • 'Réponse de validation
  • Response.Write("Message bien posté")
  • 'OU Adresse de redirection
  • Response.Redirect ("votre-page.asp")
  • 'END 
'DEBUT

'Declaration des variables
Dim Name
Dim Email
Dim Commentaire

'récup des valeur de champs en supposant que les champs se nomment name, email et commentaire.

Name = Request.Form("name")
Email = Request.Form("email")
Commentaire = Request.Form("commentaire")

'Connection
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Votre-Provider;" &_
          "User ID = Votre-User-ID;" &_
          "Pwd = Votre-Pass;" &_
          "Initial Catalog = votre-catalogue;" &_
          "Initial File Name = votre-fichier"

'Requête
objConn.Execute ("INSERT INTO votre-table (nom, email, commentaire) VALUES ('" & Name & "', '" & Email & "', '" & Commentaire & "')")

'Fermeture
objConn.Close
Set objConn = Nothing

'Réponse de validation
Response.Write("Message bien posté")

'OU Adresse de redirection
Response.Redirect ("votre-page.asp")

'END

 Conclusion

Voilà n'hésitez pas à poster un commentaire si vous décelez une erreur dans mon code.


 Sources du même auteur

INSERTION D'UNE LIGNE DANS UNE BASE DE DONNÉE ORACLE
VOIR UNE TABLE SOUS ORACLE
Toutes les sources de Legion

 Sources de la même categorie

Source avec Zip GESTION_ENSEIGNANTS par Elmarzougui
Source avec Zip ZONE MEMBRE EN ASP "E-MEMBRES1.0" par cmaelc
Source avec Zip Source avec une capture Source .NET (Dotnet) ADMINISTRATION BASE DE DONNÉES ORACLE par chbayah
Source avec Zip Source avec une capture Source .NET (Dotnet) UTILISATION D'UN DATASET par ManuAntibes
Source avec Zip Source .NET (Dotnet) INSERTION / RECUPERATION D'IMAGE STOCKEE DANS UNE DB MS SQL ... par jimmy69
Toutes les sources de la catégorie Base de données

Commentaires et avis

Commentaire de Mercury le 16/05/2002 16:59:04

Supprime les parenthèse à la ligne Response.Redirect ("votre-page.asp"), sinon tu auras une erreur.

Commentaire de Legion le 20/05/2002 18:43:20

Si si ca marche

Commentaire de Warning le 28/02/2005 18:27:56 administrateur CS

pour cette requete:
INSERT INTO data_users (username) VALUES ('testest')

j'obtient:
Erreur de compilation Microsoft VBScript error '800a0401'

Fin d'instruction attendue

/iisHelp/common/500-100.asp, line 11

Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^
Microsoft JET Database Engine error '80004005'

L'opération doit utiliser une requête qui peut être mise à jour.

/portal/asp/register.asp, line 202


d'ou cela peu il venir ??? A l'aide :(

Commentaire de richch le 01/03/2005 15:33:45

Moi aussi la même erreur que 'Warning' comment résoudre le problème?

Commentaire de Warning le 01/03/2005 19:14:20 administrateur CS

Pff comme un con j'avais ma bdd dans un repertoire en lecture seule (attention apparement les dernières versions d'IIS protege les fichiers du dossier wwwroot), donc c'est un probleme d'ecriture... Il faut vérifier que la bdd ne soit pas en lecture seule, pas dans le dossier wwwroot ni ses sous repertoires (ya un dossier fpdb je crois exprès pour la bdd),et que ta les droits d'acces a la bdd . C'est tout con et ça a résolu mon pb. ^^

Commentaire de genieship le 22/03/2006 16:18:36

j'ai pa trouvé ce dossier fpdb j'ai winxp pro + asp.net 2003
ce problem m'emerde
si qqn veux m'aider envoyé moi une solution sur ce forum ou sur genieship@gmail.com

Commentaire de rdiseo le 28/05/2009 01:19:44 7/10

Merci, je commence avec asp et sql, ça marche nickel.

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Acer Liquid (noir) (XP.H480Q.013)
Entre 300€ et 346€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Green Energy Solutions With Light Bulb Morphed Into LandscapePhoto Beautiful woman in a bikini meditating on the beach
Photo Tropical Location With Palm Tree and Woman Holding Umbrella 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,201 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)