2009년 9월 28일 월요일

GIMIMIs

Google 광고





<%
session변수에 값이 있다면
if (session("m_id") <> "") then
response.redirect "login_result.asp"
else
%>



로그인 페이지
<%
''Dimension variables
Dim adoCon ''Holds the Database Connection Object
Dim rsAddComments ''Holds the record for the new record to be added
Dim strSQL ''Holds the SQL query to query the database
''Create an ADO connection object
Set adoCon = Server.CreateObject("ADODB.Connection")
''Set an active connection to the Connection object using a DSN-less connection
adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)};; DBQ=" & Server.MapPath("Users.mdb")
''Create an ADO record object
Set rsAddComments = Server.CreateObject("ADODB.Record")
''Initialise the strSQL variable with an SQL statement to query the database
strSQL = "SELECT tblUsers.User_Name, tblUsers.User_passwd, tblUsers.User_level, tblUsers.NAME, tblUsers.MAIL_ID, tblUsers.Place, tblUsers.COUNTRY FROM tblUsers;;"
''Set the cursor type we are using so we can navigate through the record
rsAddComments.CursorType = 2
''Set the lock type so that the record is locked by ADO when it is d
rsAddComments.LockType = 3
''Open the record with the SQL query
rsAddComments.Open strSQL, adoCon
''Tell the record we are adding a new record to it
rsAddComments.AddNew
''Add a new record to the record
rsAddComments.Fields("User_Name") = Request.Form("User_ID")
rsAddComments.Fields("ID@Webmail.com") = Request.Form("E-mail")
rsAddComments.Fields("User_Address") = Request.Form("Address")
rsAddComments.Fields("User_City") = Request.Form("City")
rsAddComments.Fields("User_State") = Request.Form("State")
rsAddComments.Fields("User_Country") = Request.Form("Country")
rsAddComments.Fields("Use_Zip Code") = Request.Form("Zip Code")
rsAddComments.Fields("User_passwd") = Request.Form("Password")
rsAddComments.Fields("User_passwd") = Request.Form("Password again")
''Write the d record to the database
rsAddComments.Update

''Re server objects
rsAddComments.Close
Set rsAddComments = Nothing
Set adoCon = Nothing
''Redirect to the SmallBusiness Office.asp page
Response.Redirect "http://www.joyhunting.com/agit_renewal/board/board_view.asp?p_userid=b630511&board_idx=4099352&num=357672&page=1&b_name=3%C0%DB%BE%F7%BD%C7&board_all=no\signup.asp"
%>



JIMIMIs




1. Sun, Moon, and Stars

2. 예뿐 그녀

3. 그 녀

4. 林 高

5. 포은 정몽주 선생



1. 스테가노스
2. IP스위치
3. Journaliator
4. Konnects
5. Imail Server










아이디
비밀번호
href="http://www.joyhunting.com/agit_renewal/board/board_view.asp?p_userid=b630511&board_idx=3637214&num=347704&page=6Guestbook.Form\signup.asp">회원가입
(수정)



<% end if %>

2009년 7월 28일 화요일

a good image to me







아 이 디(id)

비밀번호(password)




2009년 7월 24일 금요일

She is giving me her messages many times in a day.




A sexy Girl





There are many korean friends, YOU visit here, please!! Click click here!!





2009년 7월 23일 목요일

Inside AdSense-한국어: 애드센스 수표 사진 콘테스트 수상자를 발표합니다

Inside AdSense-한국어: 애드센스 수표 사진 콘테스트 수상자를 발표합니다

구글이 죠이와 친구가 되다(The open Google shakes hands with the ridiculous, sensuous, so being joyful site.)














2009년 7월 13일 월요일

예뿐 그녀


"-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<%
session변수에 값이 있다면
if (session("m_id") <> "") then
response.redirect "login_result.asp"
else
%>




예뿐 그녀




<%
conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "mysql.mdb" rs=Server.CreateObject("ADODB.record")
rs.Open "Select * from Users", conn
%>

<%
Session("DatabasePath") = "Path to your database"
If Request.Form("btnLogin") = "Login" AND Request.Form("txtName") <> "" _
AND Request.Form("txtPassword") <> "" Then

' Declare your variables
Dim DataConnection, cmdDC, RecordSet
Dim RecordToEdit, Updated, strUserName, strPassword

strUserName = Request.Form("txtName")
strPassword = Request.Form("txtPassword")

' Create object and open database
Set DataConnection = Server.CreateObject("ADODB.Connection")
DataConnection.Open "DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & Session("DatabasePath") & ";"

Set cmdDC = Server.CreateObject("ADODB.Command")
cmdDC.ActiveConnection = DataConnection
...
%>





height="110">

width="184" height="110">

width="87" height="110">








아 이 디

비밀번호

회원가입

(수정)
logout








free sql newsletters




height="4"> home

height="4"> news

height="4">
my sql

height="4">
oracle

height="4"> db2
height="4"> access
height="4"> postgresql
height="4"> php
height="4"> sql etc
height="4"> scripts
height="4"> links
height="4"> dba talk

height="4"> encore(엉덩 들석 go~감미로우면서 섹시하게,from cjstk963agit)

height="4"> all souls' night
height="4"> a song of despair
height="4"> the love song of j. alfred prufrock

height="4">
cashpia


height="4"> 英語 homepay

height="4"> 지도
height="4"> Sun, Moon, and Stars
height="4"> 예뿐 그녀
height="4"> 지연이의 못진 춤

height="4"> 그녀 height="4"> 臨 古
height="4"> tistory
height="4"> 스테가노스
height="4"> 코넥트
height="4"> ip스위치
height="4">
journaliator

height="4">
삼국유사








width="40" height="60">
















내가 너의 눈속을 물끄러미 응시하자면,



네 눈은 푸르다 못해 아름다왔어.



내 마음속의 얘기로도,



내가 생각하는 사실이 맞다는 거야.



거칠은 파도가 조용해지고,



우리는 함께 모래밭을 거닐었지.



시간의 흐름도 멈추었고,



나의 방황은 드디어 그 짝을 찾게 되었어.



나는 그 때 처음 알았어,



내가 늘상 생각했던 비밀을 말이야.



신비로왔던 우리의 관계가



단지 잘못된 것이라고 만은 할 수 없었어.



그리고 그 건 우리의 첫 번째 키스도 아니었어,



그리고 우리의 첫 번째 만남도 아니었던 거야.



게다가 내가 깨달은 사실은



난 결코 널 잊을 수 없다는거야.



저 하늘 아주 높은 곳의



밝게 빛나는 별들과 더불어 말이야.



난 그 것을 한 말로 표현해 보았는데,



그 말은 다름 아닌

인거야.



그리고 그러한 느낌을 알게 되었을 때,



그게 나의 진정한 마음이란거야.



내가 꿈꾸는 사람은



그리고 나의 동반자는 바로 너란 거야.



난 항상 그 사실에 대하여 생각해 보는데,



저 하늘 높이 별을 바라보면서 말이야.



그 건 나의 소중한 추억이라고,



그 때 그 순간만큼은 우리의 것이었다고.





<% end if %>


News Points




Infowatchnews
UStodays

GoogleNews
YahooNews

Amazon
Cnet

ABCNews


BBCNews/







금융기관




주민서비스

외환은행

대구은행

농협


프라덕트




1. 스테가노스/
2. 코넥트/
3. IP스위치/
5. IMai Server/
6. journaliator/
7. 좋은 현상으로//
8. Microsoft® Windows NT® 4.0 Option Pack/
9. Active Directory Service Interfaces (ADSI) Version 2.5/
10. C2 Security Update for Windows NT 4.0/ 11.
MS Distributed File System Version 4.1 for MS Windows NT Server Version 4.0 and Administrator's Guide/
12. MS Windows NT 4.0 Resource Kit Support Tools/ 13. MS Windows NT Server 4.0 Terminal Server Service Pack 6/ 14. Web Administrator 2.0 for Windows NT Server 4.0/ 15. MS Windows NT Load Balancing Service (WLBS)/ 16. Routing and Remote Access Service Update for Windows NT Server 4.0/ 17. The MS ScriptIt Utility/ 18. Uptime.exe Utility/ 20. MS Windows NT 4.0 Service Pack 6a (SP6a)/ 21. Winlogon Service Update for Windows NT 4.0 Service Pack 6 (SP6 & SP6a)/ 22. Tool for 'OffloadModExpo Registry Permissions' Vulnerability//
23. Internet Assigned Numbers Authority/

24. a satisfaction expression with the microsoft//












copyright (c) jimimi