A
Anonymous
Misafir
ASp ile javascript arasında veri alışverişi nasıl yapabilirim ?
|
|
Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz..
Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
asp ve javascript
- Konbuyu başlatan Anonymous
- Başlangıç tarihi
-
- Etiketler
- asp javascript ve
A
Anonymous
Misafir
Client side scriptlerden(VBScript,JAVASCRIPT) server side dillere(ASP,PHP) bilgi gönderi(úez. Ancak Microsoft Remote Scripting ile bunu yapabilirsin.
A
Anonymous
Misafir
Aha bir örnek..
<script>
function uyar(msg)
{
alert(msg);
}
</script>
<body>
<%
a = "merhaba dünya"
%>
<input type="button" value="bas" onclick="uyar('<%=a%>');">
</body>
burada gördüğümüz gibi istediğimiz değişkeni fonksiyona gönderebiliriz.
<script>
function uyar(msg)
{
alert(msg);
}
</script>
<body>
<%
a = "merhaba dünya"
%>
<input type="button" value="bas" onclick="uyar('<%=a%>');">
</body>
burada gördüğümüz gibi istediğimiz değişkeni fonksiyona gönderebiliriz.
A
Anonymous
Misafir
Güzel kardeşim ben normal yollarla client side(JAVASCRIPT,VBSCRIPT) dillerden server side dillere bilgi gönderilemediğini yazdım. Server side dillerden client side dillere bilgi gönderilemeyeceğini yazmadımki. Lütfen yanlış bilgi vermeyelim diye ön yargılı bir başlıktan önce ne yazıldığını oku. Hoşçakal.
A
Anonymous
Misafir
hımmm..
o zaman şu örneğe bir göz atarmısın ??
<SCRIPT LANGUAGE="VBScript">
<!--
Sub gonder_OnClick
Dim bag,forma
set forma = document.f
set bag = createobject("adodb.connection")
veritabani ="Driver={mySQL};Server=localhost;Database=deneme;"
bag.open veritabani
set varmi = bag.execute("select user from deneme where user = ' " &forma.user.value& " ' ")
if varmi.eof then
bag.execute("insert into deneme (user) values (' " &forma.user.value& " ')")
MsgBox "başarılı"
else
MsgBox "Kayıt var başka bir user deneyin"
end if
bag.close
set bag = nothing
End Sub
-->
</SCRIPT>
<body>
<form name="f">
<input type="text" name="user">
<input type="submit" name="gonder" value="kayıt yap">
</form>
o zaman şu örneğe bir göz atarmısın ??
<SCRIPT LANGUAGE="VBScript">
<!--
Sub gonder_OnClick
Dim bag,forma
set forma = document.f
set bag = createobject("adodb.connection")
veritabani ="Driver={mySQL};Server=localhost;Database=deneme;"
bag.open veritabani
set varmi = bag.execute("select user from deneme where user = ' " &forma.user.value& " ' ")
if varmi.eof then
bag.execute("insert into deneme (user) values (' " &forma.user.value& " ')")
MsgBox "başarılı"
else
MsgBox "Kayıt var başka bir user deneyin"
end if
bag.close
set bag = nothing
End Sub
-->
</SCRIPT>
<body>
<form name="f">
<input type="text" name="user">
<input type="submit" name="gonder" value="kayıt yap">
</form>
A
Anonymous
Misafir
İstersen javascript ile bir örnekte verebilirim.
Bilmemek ayıp değil öğrenmemek ayıp demiş atalarımız
Bilmemek ayıp değil öğrenmemek ayıp demiş atalarımız
A
Anonymous
Misafir
javascript ile yapılanıda vereyim tam olsun dedim..
2 tane dosyamız var..
xlmkay.asp 1.dosya.......
<% @ Language="VBScript" %>
<%
Response.Buffer = True
Response.ContentType = "text/xml"
Response.Write "<?xml version=""1.0"" encoding=""ISO-8859-9""?>" & vbCrLf
set bag = server.createobject("adodb.connection")
veritabani ="Driver={mySQL};Server=localhost;Database=deneme;"
bag.open veritabani
set sayi = bag.execute("SELECT COUNT(*) FROM deneme WHERE user = '"&request("user")&"'")
set secme = bag.execute("SELECT user FROM deneme WHERE user = '"&request("user")&"'")
Response.Write "<UYELER>" & vbCrLf
if secme.eof then
Response.Write "<USER>" & vbCrLf
Response.Write "<AD>YOK</AD>" & vbCrLf
Response.Write "</USER>" & vbCrLf
else
While Not secme.EOF
Response.Write "<USER>" & vbCrLf
For i = 1 to sayi(0)
Response.Write "<AD>"&secme("user")&"</AD>" & vbCrLf
Next
Response.Write "</USER>" & vbCrLf
secme.MoveNext
Wend
end if
Response.Write "</UYELER>" & vbCrLf
%>
<%'**********************************************%>
dene.asp 2. dosya.....
<head>
</head>
<body>
<XML ID="dsoUYELER"></XML>
<form name="f" action="#">
User : <input type="text" name="user" onchange="kontrol();">
Pass : <input type="text">
</form>
<script language="Javascript">
function kontrol()
{
var currNode;
dsoUYELER.async = false;
dsoUYELER.SRC="xlmkay.asp?user=" + document.f.user.value
objNodeListad = dsoUYELER.getElementsByTagName("AD");
if(objNodeListad.item(0).text == "YOK"){alert("Bu kullanıcı adı kayıtlı değil.Kayıt ettirebilirsiniz");return false;}
if(document.f.user.value == objNodeListad.item(0).text){alert("Bu kullanıcı adı mevcut.Lütfen başka bir kullanıcı adı deneyiniz");}
}
</script>
</body>
2 tane dosyamız var..
xlmkay.asp 1.dosya.......
<% @ Language="VBScript" %>
<%
Response.Buffer = True
Response.ContentType = "text/xml"
Response.Write "<?xml version=""1.0"" encoding=""ISO-8859-9""?>" & vbCrLf
set bag = server.createobject("adodb.connection")
veritabani ="Driver={mySQL};Server=localhost;Database=deneme;"
bag.open veritabani
set sayi = bag.execute("SELECT COUNT(*) FROM deneme WHERE user = '"&request("user")&"'")
set secme = bag.execute("SELECT user FROM deneme WHERE user = '"&request("user")&"'")
Response.Write "<UYELER>" & vbCrLf
if secme.eof then
Response.Write "<USER>" & vbCrLf
Response.Write "<AD>YOK</AD>" & vbCrLf
Response.Write "</USER>" & vbCrLf
else
While Not secme.EOF
Response.Write "<USER>" & vbCrLf
For i = 1 to sayi(0)
Response.Write "<AD>"&secme("user")&"</AD>" & vbCrLf
Next
Response.Write "</USER>" & vbCrLf
secme.MoveNext
Wend
end if
Response.Write "</UYELER>" & vbCrLf
%>
<%'**********************************************%>
dene.asp 2. dosya.....
<head>
</head>
<body>
<XML ID="dsoUYELER"></XML>
<form name="f" action="#">
User : <input type="text" name="user" onchange="kontrol();">
Pass : <input type="text">
</form>
<script language="Javascript">
function kontrol()
{
var currNode;
dsoUYELER.async = false;
dsoUYELER.SRC="xlmkay.asp?user=" + document.f.user.value
objNodeListad = dsoUYELER.getElementsByTagName("AD");
if(objNodeListad.item(0).text == "YOK"){alert("Bu kullanıcı adı kayıtlı değil.Kayıt ettirebilirsiniz");return false;}
if(document.f.user.value == objNodeListad.item(0).text){alert("Bu kullanıcı adı mevcut.Lütfen başka bir kullanıcı adı deneyiniz");}
}
</script>
</body>