- BaRaN
-
Mesaj Sayısı : 873
Doğum tarihi : 02/12/89
Yaş : 34
Nerden : güneşin doğduğu yer(DOĞUBEYAZIT)
İş/Hobi : cep telefonu
Bilgi : <center><font color="blue"><marquee direction="left" style="background:white">Muradiye Forum Bilgi Paylaşım Platformu</marquee></font></center
Rep Gücü : 0
Rep Puan : 8
Kayıt tarihi : 20/12/08
Veritabanına Online Tablo Eklemek
C.tesi Ocak 31, 2009 12:58 pm
Kod:
<%
On Error Resume Next
StrDB = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("veritabani.mdb" )
Set StrConn = Server.CreateObject("ADODB.Connection" )
StrConn.Open StrDB
SQL = "CREATE TABLE Tabloadi (sutun1 TEXT(255), sutun2 MEMO )"
StrConn.Execute SQL
If Err <> 0 Then
Response.Write "Tablo eklenmedi"
Else
Response.Write "Tablo eklendi"
End If
StrConn.Close
Set StrConn = Nothing
%>
<%
On Error Resume Next
StrDB = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("veritabani.mdb" )
Set StrConn = Server.CreateObject("ADODB.Connection" )
StrConn.Open StrDB
SQL = "CREATE TABLE Tabloadi (sutun1 TEXT(255), sutun2 MEMO )"
StrConn.Execute SQL
If Err <> 0 Then
Response.Write "Tablo eklenmedi"
Else
Response.Write "Tablo eklendi"
End If
StrConn.Close
Set StrConn = Nothing
%>
Bu forumun müsaadesi var:
Bu forumdaki mesajlara cevap veremezsiniz