Hello, my name is ilhan yücel. I'm a user of 'web wiz forum 6.34' In my
forum,I have made options to use different dimensions for avatar and to
choose pictures from the opening page.Can you include these characteristics
in 'web wiz forum's version 7' ?
the codes I use:
______________profil_edit.asp_____________________________________
<SCRIPT language=JavaScript>
<!--
var resim = new Image;
function yenile()
{
resim.src = frmRegister.SelectAvatar.options[frmRegister.SelectAvatar.selectedIndex].value;
frmRegister.avatar.src = frmRegister.SelectAvatar.options[frmRegister.SelectAvatar.selectedIndex].value
w=resim.width
h=resim.height
frmRegister.avatar.width=w
frmRegister.avatar.height=h
frmRegister.txtAvatar.value='http://'
frmRegister.oldAvatar.value='';
frmRegister.avatar_width.value =w
frmRegister.avatar_height.value =h
}
function control1()
{
resim.src = frmRegister.SelectAvatar.options[frmRegister.SelectAvatar.selectedIndex].value;
setTimeout("yenile()",1000)
}
function pencere(w,h,scroll) {
ac="width="+w+",height="+h+",resizable=no,status=no,scrollbars="+scroll;
var win2=window.open("avatars.asp","face",ac);
win2.focus();
}
// -->
</SCRIPT>
<SCRIPT language=JavaScript>
<!--
function control2()
{
if (frmRegister.txtAvatar.value != "http://")
{
resim.src = frmRegister.txtAvatar.value;
w=resim.width
h=resim.height
if (w>100)
{
alert ("Seçtiğiniz resmin boyutları otomatik olarak ayarlanacaktir.")
ht = 100 / w
h= Math.round(ht * h)
w=100
}
if (h>150)
{
wt = 150 / h
w= Math.round(wt * w)
h=150
}
frmRegister.avatar.width =w
frmRegister.avatar.height =h
frmRegister.avatar.src = resim.src
frmRegister.avatar_width.value =w
frmRegister.avatar_height.value =h
}
else
{
alert("Lütfen bir resim adresi yazın.")
}
}
// -->
</SCRIPT>
<%
'dim baglanti
dim yaz
dim SQL
'Set baglanti = Server.CreateObject("ADODB.Connection")
'baglanti.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=......themgForum.mdb"
Set yaz = Server.CreateObject("ADODB.RecordSet")
SQL = "Select * from tblAvatar ORDER BY ID;"
yaz.open SQL,strCon,1,3
%>
<select name="SelectAvatar" onChange="control1()">
<option value="Avatar_all/blank.gif"><% = strTxtNoneSelected %></option>
<%
Do while not yaz.eof
%>
<OPTION value="Avatar_all/<%= yaz("Avatar_Directory") %>/<%=yaz("Avatar_Name")%>"
<% if rsProfile("Avatar") = "Avatar_all/"&yaz("Avatar_Directory") &"/"&yaz("Avatar_Name") then
Response.Write"SELECTED"
end if
%>
><%=Replace(yaz("Avatar_Name"),"_",Chr(32))%></OPTION>
<%
yaz.movenext
loop
%>
</select>
<br>
<span style="font-size: <% = intSmallFontSize %>px;"><A onclick="pencere(500,580,'yes')" href="avatars.asp?grup=1&syf=1" target=face style="font-size: <% = intSmallFontSize %>px;">Tüm liste ve pratik seçim için tıkla</a></span>
</td>
<td width="128" align="center" height="100">
<img src="<%'If there is an avatar then display itIf strAvatar <> "" Then Response.Write(strAvatar)Else Response.Write("Avatar_all/blank.gif")End If %>" width="<%=rsProfile("avatar_width")%>" height="<%=rsProfile("avatar_height")%>" name="avatar" ><!--Database den yükseklik ve genişlik çağır -->
<input type="hidden" name="oldAvatar" value="<% = strAvatar %>">
<input type="hidden" name="avatar_width" value="<%=rsProfile("avatar_width")%>">
<input type="hidden" name="avatar_height" value="<%=rsProfile("avatar_height")%>"></td>
</tr>
<tr>
<td colspan="2"> <br>
<input type="text" name="txtAvatar" size="44" maxlength="100" value="<%
'If the avatar is the persons own then display the link
If InStr(1, strAvatar, "http://") > 0 Then
Response.Write(strAvatar)
Else
Response.Write("http://")
End If
%>" onChange="oldAvatar.value=''" >
<center><input type="button" name="preview" value="<% = strTxtPreview %>" onClick="control2()"></center>
</td>
</tr>
</table>
_________________________avatars.asp____________________________
<SCRIPT language=javascript>
<!--
function SymError(){ return true;}
window.onerror = SymError;
var resim = new Image;
function yollaaa(neyi,nasil)
{
resim.src='Avatar_all/'+nasil
window.opener.frmRegister.SelectAvatar.options[neyi].selected=true;
window.opener.frmRegister.avatar.src="Avatar_all/"+nasil;
window.opener.frmRegister.avatar.width=resim.width
window.opener.frmRegister.avatar.height=resim.height
window.opener.frmRegister.avatar_width.value =resim.width
window.opener.frmRegister.avatar_height.value =resim.height
window.opener.frmRegister.txtAvatar.value='http://'
window.opener.frmRegister.oldAvatar.value='';
}
//-->
</SCRIPT>
<td width="100" height="110"><A onclick="yollaaa(<%=yaz("ID")%>,'<%= yaz("Avatar_Directory") %>/<%=yaz("Avatar_Name")%>');" style="cursor:hand"><center><img src="Avatar_all/<%= yaz("Avatar_Directory") %>/<%=yaz("Avatar_Name")%>"></center><br><center><%=Replace(yaz("Avatar_Name"),"_",Chr(32))%></center></a></td>
<%
yaz.MoveNext
avatar_diz=avatar_diz+1
if avatar_diz mod 4=0 then
%></tr><tr>
______________________upload_avatar.asp__________________________________
<SCRIPT language=javascript>
<!--
function upload()
{
window.opener.frmRegister.txtAvatar.value='Avatar_all/upload/<%= resim_ad %>'
window.opener.frmRegister.oldAvatar.value='';
window.opener.control2()
}
//-->
</SCRIPT>
<a href="javascript:window.close()" onClick="upload()" style="cursor:hand">
<img src="Avatar_all/upload/<%= resim_ad %>" border="0"></a>
http://www.melodik.net/forum/default.asp