Tablo oluşturma

<%
' Veri Tabanindaki Field'larin degerleri

'
------------------------------------------------------------------------------------

' Metin = Text

' Not = MEMO

' Sayi = NUMERIC

' Tarih/Saat = TIMEDATE

' Para Birimi = MONEY

' Otomatik Sayi = COUNTER

' Evet/Hayir = YESNO

' Kpr = HYPERLINK

'
------------------------------------------------------------------------------------

' Veritabanina Baglantimizi Yapiyoruz.

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

Baglanti.Open (""DRIVER={Microsoft Access Driver
(*.mdb)};DBQ=""&
Server.Mappath(""veritabani.mdb""))


' Simdi Kayit dizisini aarak tablolari ekleyelim

Set Rs = Server.Createobject(""Adodb.Recordset"")

Sorgu = ""Create TABLE selamssssx (Metin CHAR(254), Sayi
DATETIME, Yazi MEMO, Param MONEY , evetmi YESNO , sayac COUNTER
)""

Rs.Open Sorgu, Baglanti, 1, 3

Response.Write "" Tablonuz Olusturuldu""

%>
"