<%
Set Sur = Server.CreateObject("ADODB.Connection")
Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../veritabanim/veritabani.mdb")
%>
<% Set WM = Sur.Execute("SELECT * FROM fotograflar order by yer asc") %>
<select name="yer" size="1" id="yer" style="font-family: Verdana ; font-size: 12pt">
<% Do While Not WM.eof %>
<option value="<%=WM("yer")%>"><%=WM("yer")%></option>
<% WM.Movenext
Loop %>
</select>kodu çalıştırdığımda yer ismi görünmüyor ama kodlara baktığımda value= kısmında görünüyor. anlayamadım sebebini.
Veritabanını Listboxa Yazdırma
3
●528
- 13-02-2014, 01:23:49arkadaşlar önceki hazırladığım sitelerde çalışan bir kodu yeni yaptığım sitede çalıştaramadım. gözümden kaçan bir şey mi var acaba? bakabilir misiniz?
- 13-02-2014, 15:28:48Kimlik doğrulama veya yönetimden onay bekliyor.SELECT * kullanmak yerine sadece gerekli alanları çekip yazdırırken de indexleri ile (<% =WM(0) %>) gibi kullanarak deneyebilirsiniz.
sayfada
"on error resume next" varsa o konu yorum haline getirip deneyebilirsiniz. Hata ile karşılaşıyorsa es geçip yoluna devam ediyor olabilir. Hatayı görmek sonucu hızlandıracaktır.
Yine de problem devam ederse sayfanın tüm kodlarını buraya eklerseniz bir göz atablirim. - 13-02-2014, 20:46:09herhangi bir uyarı vermedi de value yi gösteriyor, sayfada seçim penceresi içinde göstermiyordu. veritabanına bir sütun daha ekledim isim1, isim2 şeklinde oldu. böyle yapınca oldu. isim1 i value olarak, isim2 yi de seçim ekranında gösterecek şekilde ayarladım yani. anlamadım niye böyle olduğunu hala amaerolife adlı üyeden alıntı: mesajı görüntüle
çalışan kod çalışmadı.
- 14-02-2014, 13:04:15Çözüm bulman iyi olmuş ama bana sorarsan bulduğun çözüm günü kurtarmak adına bulunmuş bir kandırmaca

Olması gereken yeni sütun eklemekten ziyade tek sütun kullanmaya devam etmek ve problemi kesin bir şekilde çözmek.
Her seferinde yeni alan eklemek mantıklı olmayacak iş ve zaman kaybı yaratacaktır diye düşünüyorum.
çalışan kod çalışmadı.