<%@CODEPAGE="1252"%>
<!--#include file="conn.asp"-->
<%
'declaration des variables
Dim ObjConnect, strConn, ObjcmdProc
Dim SQL, objRsetUser
Dim ListeCat, TxtNom
'response.Write("TxtNom " & request.Form("TxtNom") & "<BR>")
'response.Write("ListeCat " & request.Form("ListeCat"))
'response.End()
ListeCat = request.Form("ListeCat")
TxtNom = request.Form("TxtNom")
set ObjConnect = Server.CreateObject( "ADODB.Connection" )
strConn = connexion_PLA
SQL = "INSERT INTO LOGICIEL VALUES (4, " & ListeCat & ", '" & TxtNom & "', 5)"
'SQL = "INSERT INTO LOGICIEL (id_Log, id_Cat, nomLog, NumLicence)VALUES (5, 1, 'essai3', 5)"
response.Write(SQL)
'response.End()
'set ObjcmdProc = server.CreateObject ("ADODB.Command")
'ObjcmdProc.ActiveConnection = ObjConnect ',adOpenForwardOnly,adLockReadOnly
'ObjcmdProc.CommandText = SQL
'ObjcmdProc.CommandType = 1 'adCmdText
ObjConnect.Execute SQL
ObjConnect.close
'response.Write("<br>RecordSet : " & objRsetUser("ID_LOG") & objRsetUser("NOMLOG") & "<br>")
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
Page Insertion
</body>
</html>
Partager