list menüye veri cekmek yardım

28-05-2009, 11:17:50

iyi günler

arkadaslar bi konuda yardımınıza ihtiyacım var

şimdi veritabanında

2 tablo var

tablo1
ve tablo2 diyelim

ben şimdi

bir listmenü ile firmalar diyecem mesela
bu firmalara
"tablo 1" deki "adi" dan verilei cekicek kac tane varsa nasıl yapabilirim

cok acil

28-05-2009, 18:06:28

#2

anka81

<%
rs.open "Select * from tablo1"
do While Not rs.Eof
%>
firma adi: <%=rs("firma_adi")%>
<%
yerli.MoveNext
Loop
%>
_____________________________
listmenü derken dropdown kastediyosan yine aynı mantık. option ları döngüye sokacan. misal:

<select name="firmalar">
<%
rs.open "select * from tablo1"
Do While Not rs.eof
%>
<option value="<%=rs("firma_adi")%>"></option>
<%
rs.MoveNext
Loop
%>
</select>
_______________
gibi. (veritabanını bağladığını ve kayıtsetini rs olarak set ettiğini düşünerek örnek verdim, kendi bağlantılarına uydur onları.)

28-05-2009, 20:13:28

#3

CroNicDeLy

yaptım ama yine gözükmüyor

kodlar burda del oldum

<% @CodePage = 1254 %>
<%
Response.Buffer = True
%>
<%
Set baglanti = Server.CreateObject("ADODB.Connection")
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/stokincilay.mdb")
set rs = Server.CreateObject("ADODB.RecordSet")
%>
 
 
 
<html>
<head>
<title>stok</title>
<meta http-equiv="content-type" content="text/html; charset=windows-1254">
<meta http-equiv="content-type" content="text/html; charset=iso-8859-9">
<meta http-equiv="content-language" content="tr">
<!-- #include file="style.asp" -->
</head>
<!-- #include file="config.asp" -->
<body bgcolor="#ffffff" text="#000000" leftmargin="0" topmargin="0" rightmargin="0">
<!-- #include file="menu.asp" -->
<p><br>
</p>
<p><br>
<br>
<br>
<br>
</p>
<table border="1" align="center" bordercolor="#e4f5db">
<tr>
<td><h3> :: Yeni Stok Girisi :: </h3></td>
</tr>
</table>
<br>
<form action="firma_add_islem.asp" method="post">
<table border="0" align="center" width="550"><tr>
<td align="left"><table border="0" align="center" width="550">
<tr>
<td align="left">Kod</td>
<td align="left"><label>
<input name="adi" type="text" value="" class="form2" size=" ">
</label></td>
<td align="left">firma Adı</td>
<select name="firmalar">
<%
rs.open "select * from firma"
Do While Not rs.eof
%>
<option value="<%=rs("adi")%>"></option>
<% 
rs.MoveNext
Loop
%>
</select> 
 
 
</select></td>
<td align="left">adres</td>
<td align="left"><textarea name="adres" cols=" " class="form2"></textarea></td>
</tr>
<tr>
 
 
<td align="left">tel :</td>
<td align="left">
 
<select name="firma2" id="firma2">
<option selected>Stok SEcin</option>
</option>
</select></td>
<td align="left">ilgili</td>
<td align="left"><input name="ilgili" type="text" value="" class="form2" size=" "></td>
</tr>
<tr> </tr>
<tr>
<td align="left" valign="top">&nbsp;</td>
<td align="left">&nbsp;</td>
</tr>
<tr>
<td align="center" colspan="6"><br>
<br>
<input type="submit" value=" .Kaydet. " class="form3">
&nbsp;&nbsp;&nbsp;
<input type="reset" value=" .Temizle. " class="form3"></td>
</tr>
</table></td>
</tr>
</table>
</form>
</body>
</html>

28-05-2009, 22:03:16

#4

anka81

set vt = Server.CreateObject("ADODB.RecordSet")

kayıtsetini vt ile açmışsın, aşağıda rs ile döngüye sokmuşsun.
ikisi aynı değil, döngüyü vt yap yada kayıtsetini rs.

ufak tefek hatalar nası gıcık ediyo dimi, altı üstü bi isim hatası.
kolay gelsin.

28-05-2009, 22:18:15

#5

CroNicDeLy

anka81 adlı üyeden alıntı: mesajı görüntüle

set vt = Server.CreateObject("ADODB.RecordSet")

kayıtsetini vt ile açmışsın, aşağıda rs ile döngüye sokmuşsun.
ikisi aynı değil, döngüyü vt yap yada kayıtsetini rs.

ufak tefek hatalar nası gıcık ediyo dimi, altı üstü bi isim hatası.
kolay gelsin.

tamam burda ılk halını yazmısım ama senın verdıgını yaptım set rs yaptım da

tablodan veriyi cekmiyo

28-05-2009, 22:43:33

#6

anka81

rs.execute yapmazsan sürücüyü belirtmen gerek de ondan çünkü. o kısmı atlamışsın. yani kayıtsetini şöyle açacan:

rs.open "select * from firma",baglanti,1,3

28-05-2009, 22:52:32

#7

CroNicDeLy

anka81 adlı üyeden alıntı: mesajı görüntüle

rs.execute yapmazsan sürücüyü belirtmen gerek de ondan çünkü. o kısmı atlamışsın. yani kayıtsetini şöyle açacan:

rs.open "select * from firma",baglanti,1,3

Degısen Bısey Olmadı

firma tablosundali adi dan cekicek sen bi toparlayıp yazsan bura olmazmı

28-05-2009, 23:37:40

#8

anka81

include dosyalarını, veritabanı tablo ve sütun adlarını filan kontrol et. include larda aynı isimli recordset veya kapatılan db falan olabilir.
onun dışında kodlarda bi sorun göremiyom. yine yazsam aynı şeyleri yazacam.