<%
Option Explicit
Dim Name: Name = Request("Name")
Dim Email: Email = Request("Email")
Dim Title: Title = Request("Title")
Dim IP: IP = Request.ServerVariables("REMOTE_ADDR")
Dim objCon: Dim strSql
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open("Provider=SQLOLEDB.1;Password=1234;Persist Security Info=True;User ID=ASP;Initial Catalog=ASP;Data Source=.\SQLEXPRESS")
'순수 데이터 자리 : 홍길동 -> " & 변수 & "
strSql = "Insert Memos Values('" & Name & "', '" & Email & "', '" & Title & "', GetDate(), '" & IP & "')"
objCon.Execute(strSql)
objCon.Close()
Set objCon = Nothing
Response.Redirect("./MemoList.asp")
%>

관련 아티클 리스트
	제       목	파일	작성자	작성일	조회
	18. CDO(Collaboration Data Object) : 메일 전송(SMTP...	-	관리자	2000-12-27	7508
	17. ADO(ActivX Data Object) : 데이터베이스(DataBase) ...	-	관리자	2000-12-27	7265
	사이트갤럭시 업로드 컴포넌트 사용법 간단한 소스		관리자	2001-09-11	11794
	1. OLE DB를 사용한 데이터베이스 연결	-	레드플러스	2004-04-05	6824
	2. ADO 상수 사용법	-	레드플러스	2004-04-17	7319
	3. ADO 학습을 위한 Memo 테이블 생성(한줄 메모장 작성)		레드플러스	2004-04-17	6004
	4. UDL파일을 통한 데이터베이스 연결 문자열 생성	-	레드플러스	2004-04-18	6770
	Insert문.asp : ADO의 Connection객체를 사용한 Insert문 실행		레드플러스	2004-04-18	8062
	Update문.asp		레드플러스	2004-04-18	6528
	Delete문.asp		레드플러스	2004-04-18	6035
	Select문.asp		레드플러스	2004-04-18	6841
	Select문2.asp		레드플러스	2004-04-18	6303
	한줄메모장(글쓰기 폼) : MemoWrite.asp		레드플러스	2004-04-20	7139
	한줄메모장(글쓰기 처리) : MemoWriteProcess.asp		레드플러스	2004-04-20	6157
	한줄메모장(리스트) : MemoList.asp		레드플러스	2004-04-20	6969
	한줄메모장(지우기 폼) : MemoDelete.asp		레드플러스	2004-04-20	6140
	한줄메모장(지우기 처리) : MemoDeleteProcess.asp		레드플러스	2004-04-20	6796
	16. ASP사용자를 위한 SQL문	-	관리자	2000-12-27	9039