implant


  Aktif KonularAktif Konular  Forum Üyelerini GösterÜye Listesi  Forumu AraArama  YardımYardım
  Kayıt OlKayıt Ol  GirişGiriş
ASP / ASP.NET
 ASPTurkiye.com Forum : ASP / ASP.NET
Konu Konu: işin içinden çıkamadım. mdb den çektiğim Yanıt YazYeni Konu Gönder
Yazanlarda
Mesaj << Önceki Konu | Sonraki Konu >>
aydd
Yeni Üye
Yeni Üye


Kayıt Tarihi: 17-Kasım-2007
Gönderilenler: 2
Gönderen: 06-Mayıs-2009 Saat 02:39 | Kayıtlı IP Alıntı aydd

SONRADAN EKLEMEK İSTEDİĞİM MDB OLANLI KODUM
Kod:
<%
Set Tech = Server.CreateObject("ADODB.Connection")
Tech.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("efestech.mdb")

id= Request("id")
Set Rs = Server.CreateObject("ADODB.Recordset")
StrSql = "Select * from efestech order by id desc"
Rs.Open StrSql, Tech, 1, 3
%>
 

 <%
do while not rs.eof
response.write rs("efestech") & ","
rs.movenext
loop
%>


BUDA KULLANMIŞ OLDUĞUM KOD şimdi burda ahmet1 2 3 4 diye yazılanları ben ftp ye girip elle değiştirmek zorunda kalıyorum . yukardaki mdb deki bilgileri ahmet1 ahmet2 ahmet3 .... tırnak içindeki kısma yazdırırsam ftp ye girip dosya editlemeden admin sayfasından editleme yapıcam  o kısmı soruyorum yardımcı olursanız sevinicem tşkrler

KISACA : ahmet1,ahmet2,ahmet3,ahmet4, bunlarnı yerine hangi kodu yazayımki yukardaki mdb den çektiğim veri oraya yazılsın
Kod:
<%

if Application("arrays") = "" then
APPLICATION.LOCK
Application("arrays") = "ahmet1,ahmet2,ahmet3,ahmet4,"
APPLICATION.UNLOCK
end if
 
dim rastgele
dim gelen
dim temizle
Dim rasgele_sayi
rastgele= Split(Application("arrays"),",")
Randomize
rasgele_sayi =  int((Rnd * ubound(rastgele))+1)
gelen = rastgele(rasgele_sayi-1)
Session("uye_adi")=gelen
response.write gelen
 

 
APPLICATION.LOCK
temizle = Replace(Application("arrays"),gelen &",","", 1, -1, 0)
Application("arrays") = temizle
APPLICATION.UNLOCK
%>

Yukarı Dön Göster aydd's Özellikler Diğer Mesajlarını Ara: aydd
 
greyder
Üye
Üye


Kayıt Tarihi: 22-Mart-2007
Ülke: Türkiye
Gönderilenler: 90
Gönderen: 04-Haziran-2009 Saat 20:49 | Kayıtlı IP Alıntı greyder

özel mesajla msn ni gönder tam anlayamadım....
Yukarı Dön Göster greyder's Özellikler Diğer Mesajlarını Ara: greyder Ziyaret greyder's Ana Sayfa
 

Eğer Bu Konuya Cevap Yazmak İstiyorsanız İlk Önce Giriş
Eğer Kayıtlı Bir Kullanıcı Değilseniz İlk Önce Kayıt Olmalısınız

  Yanıt YazYeni Konu Gönder
Yazıcı Sürümü Yazıcı Sürümü

Forum Atla
Kapalı Foruma Yeni Konu Gönderme
Kapalı Forumdaki Konulara Cevap Yazma
Kapalı Forumda Cevapları Silme
Kapalı Forumdaki Cevapları Düzenleme
Kapalı Forumda Anket Açma
Açık Forumda Anketlerde Oy Kullanma

Powered by Web Wiz Forums version 7.91
Copyright ©2001-2004 Web Wiz Guide

Bu Sayfa 0,0781 Saniyede Yüklendi.