Кто разбирается в Java

Langly · 4 июня 2008

Суть вот в чем.

У меня есть два поддомена с партнерскими сайтами.

http://game.endem.ru/

http://love.endem.ru/

Я их создал специально, чтобы иметь доп. многостраничные площадкидля размещения ссылок на свой сайт и кодов сапе или ксапа.

В админке партнерки я могу вставлять в эти страницы HTML-коды ссылок, банеров итд.

Много страниц уже проиндексировано поисковиками и я хотел вставить туда код ХАР-а(аналог SAPE).

Но в техподдержке партнерок сказали, что возможна вставка только кода на Яве, PHP не поддерживается.

На ХАР-е техподдержка сама не знает как это делать, но у них есть такой абзац:

"ASP
Предлагаем протестировать новые коды для asp и aspx (не забудьте там поменять your login на ваш логин маленькими буквами).
Вы можете связаться с нами по E-mail: administration@xap.ru
Безопасность: если наш сервер не работает, ваши страницы будут загружаться без нашего объявления, без ошибок! "

Я понятия не имею, что с этим делать...

Подскажите кто-нибудь, пожалуйста.

По первой ссылке (asp) скачивается два файла:

1. banner.asp

2. md5.asp

1-banner.asp содержит такой код:

<%@Language="JScript" %>

<!-- #include file="md5.asp" -->

<%

var login="your_login";

var xap_adv="";

var ru=String(Request.ServerVariables("SCRIPT_NAME"));

var site=String(Request.ServerVariables("HTTP_HOST"));

ru = ru.substring(0,ru.lastIndexOf("/")+1);

if(ru.length==0)ru="/";

if(ru.length<=180){

	if(ru=="")ru="/";

	var file=base64Encode(ru);

	site=site.replace("www.","");

	var path_code=md5(file);

	var user_pref=login.substring(0,2);

	var path=path_code.substring(0,1)+"/"+path_code.substring(1,3)+"/";

	var domain=login+".tnx.net";

	path="/users/"+user_pref+"/"+login+"/"+site+"/"+path+file+".txt";

	var xmlHttpReq = Server.CreateObject("MSXML2.XMLHTTP.3.0");

	xmlHttpReq.open("GET", "http://"+domain+path, false);

	xmlHttpReq.send();

	if(xmlHttpReq.status==200){

		var res = xmlHttpReq.responseText;

		Response.Write(res);

	}else Response.Write("Error: "+xmlHttpReq.status);

	xmlHttpReq=null;

}

function base64Encode(instr){

	var b64str='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=';

	var b1,b2,b3,ca,cb,cc,cd,j=0,tret=new Array();

	for(var i=0;i<instr.length;i+=3){

		b1=instr.charCodeAt(i);

		b2=instr.charCodeAt(i+1);

		b3=instr.charCodeAt(i+2);

		ca=b1>>2;

		cb=((b1&3)<<4)|(b2>>4);

		cc=((b2&15)<<2)|(b3>>6);

		cd=b3&63;

		if(isNaN(b2))cc=cd=64;else if(isNaN(b3))cd=64;

		tret[j++]=b64str.charAt(ca)+b64str.charAt(cb)+b64str.charAt(cc)+b64str.charAt(cd);

	}

	return tret.join('');

}

%>

2-md5.asp содержит такой код:

<script runat=server language="vbscript">

Private Const BITS_TO_A_BYTE=8

Private Const BYTES_TO_A_WORD=4

Private Const BITS_TO_A_WORD=32

Private m_lOnBits(30)

Private m_l2Power(30)

m_lOnBits(0)=CLng(1)

m_lOnBits(1)=CLng(3)

m_lOnBits(2)=CLng(7)

m_lOnBits(3)=CLng(15)

m_lOnBits(4)=CLng(31)

m_lOnBits(5)=CLng(63)

m_lOnBits(6)=CLng(127)

m_lOnBits(7)=CLng(255)

m_lOnBits(8)=CLng(511)

m_lOnBits(9)=CLng(1023)

m_lOnBits(10)=CLng(2047)

m_lOnBits(11)=CLng(4095)

m_lOnBits(12)=CLng(8191)

m_lOnBits(13)=CLng(16383)

m_lOnBits(14)=CLng(32767)

m_lOnBits(15)=CLng(65535)

m_lOnBits(16)=CLng(131071)

m_lOnBits(17)=CLng(262143)

m_lOnBits(18)=CLng(524287)

m_lOnBits(19)=CLng(1048575)

m_lOnBits(20)=CLng(2097151)

m_lOnBits(21)=CLng(4194303)

m_lOnBits(22)=CLng(8388607)

m_lOnBits(23)=CLng(16777215)

m_lOnBits(24)=CLng(33554431)

m_lOnBits(25)=CLng(67108863)

m_lOnBits(26)=CLng(134217727)

m_lOnBits(27)=CLng(268435455)

m_lOnBits(28)=CLng(536870911)

m_lOnBits(29)=CLng(1073741823)

m_lOnBits(30)=CLng(2147483647)


m_l2Power(0)=CLng(1)

m_l2Power(1)=CLng(2)

m_l2Power(2)=CLng(4)

m_l2Power(3)=CLng(8)

m_l2Power(4)=CLng(16)

m_l2Power(5)=CLng(32)

m_l2Power(6)=CLng(64)

m_l2Power(7)=CLng(128)

m_l2Power(8)=CLng(256)

m_l2Power(9)=CLng(512)

m_l2Power(10)=CLng(1024)

m_l2Power(11)=CLng(2048)

m_l2Power(12)=CLng(4096)

m_l2Power(13)=CLng(8192)

m_l2Power(14)=CLng(16384)

m_l2Power(15)=CLng(32768)

m_l2Power(16)=CLng(65536)

m_l2Power(17)=CLng(131072)

m_l2Power(18)=CLng(262144)

m_l2Power(19)=CLng(524288)

m_l2Power(20)=CLng(1048576)

m_l2Power(21)=CLng(2097152)

m_l2Power(22)=CLng(4194304)

m_l2Power(23)=CLng(8388608)

m_l2Power(24)=CLng(16777216)

m_l2Power(25)=CLng(33554432)

m_l2Power(26)=CLng(67108864)

m_l2Power(27)=CLng(134217728)

m_l2Power(28)=CLng(268435456)

m_l2Power(29)=CLng(536870912)

m_l2Power(30)=CLng(1073741824)


Private Function LShift(lValue,iShiftBits)

  If iShiftBits=0 Then

	LShift=lValue

	Exit Function

  ElseIf iShiftBits=31 Then

	If lValue And 1 Then

	  LShift=&H80000000

	Else

	  LShift=0

	End If

	Exit Function

  ElseIf iShiftBits<0 Or iShiftBits>31 Then

	Err.Raise 6

  End If


  If (lValue And m_l2Power(31-iShiftBits)) Then

	LShift=((lValue And m_lOnBits(31-(iShiftBits+1)))*m_l2Power(iShiftBits)) Or &H80000000

  Else

	LShift=((lValue And m_lOnBits(31-iShiftBits))*m_l2Power(iShiftBits))

  End If

End Function


Private Function RShift(lValue,iShiftBits)

  If iShiftBits=0 Then

	RShift=lValue

	Exit Function

  ElseIf iShiftBits=31 Then

	If lValue And &H80000000 Then

	  RShift=1

	Else

	  RShift=0

	End If

	Exit Function

  ElseIf iShiftBits<0 Or iShiftBits>31 Then

	Err.Raise 6

  End If


  RShift=(lValue And &H7FFFFFFE)\m_l2Power(iShiftBits)


  If (lValue And &H80000000) Then

	RShift=(RShift Or (&H40000000\m_l2Power(iShiftBits-1)))

  End If

End Function


Private Function RotateLeft(lValue,iShiftBits)

  RotateLeft=LShift(lValue,iShiftBits) Or RShift(lValue,(32-iShiftBits))

End Function


Private Function AddUnsigned(lX,lY)

  Dim lX4

  Dim lY4

  Dim lX8

  Dim lY8

  Dim lResult


  lX8=lX And &H80000000

  lY8=lY And &H80000000

  lX4=lX And &H40000000

  lY4=lY And &H40000000


  lResult=(lX And &H3FFFFFFF)+(lY And &H3FFFFFFF)


  If lX4 And lY4 Then

	lResult=lResult Xor &H80000000 Xor lX8 Xor lY8

  ElseIf lX4 Or lY4 Then

	If lResult And &H40000000 Then

	  lResult=lResult Xor &HC0000000 Xor lX8 Xor lY8

	Else

	  lResult=lResult Xor &H40000000 Xor lX8 Xor lY8

	End If

  Else

	lResult=lResult Xor lX8 Xor lY8

  End If


  AddUnsigned=lResult

End Function


Private Function F(x,y,z)

  F=(x And y) Or ((Not x) And z)

End Function


Private Function G(x,y,z)

  G=(x And z) Or (y And (Not z))

End Function


Private Function H(x,y,z)

  H=(x Xor y Xor z)

End Function


Private Function I(x,y,z)

  I=(y Xor (x Or (Not z)))

End Function


Private Sub FF(a,b,c,d,x,s,ac)

  a=AddUnsigned(a,AddUnsigned(AddUnsigned(F(b,c,d),x),ac))

  a=RotateLeft(a,s)

  a=AddUnsigned(a,b)

End Sub


Private Sub GG(a,b,c,d,x,s,ac)

  a=AddUnsigned(a,AddUnsigned(AddUnsigned(G(b,c,d),x),ac))

  a=RotateLeft(a,s)

  a=AddUnsigned(a,b)

End Sub


Private Sub HH(a,b,c,d,x,s,ac)

  a=AddUnsigned(a,AddUnsigned(AddUnsigned(H(b,c,d),x),ac))

  a=RotateLeft(a,s)

  a=AddUnsigned(a,b)

End Sub


Private Sub II(a,b,c,d,x,s,ac)

  a=AddUnsigned(a,AddUnsigned(AddUnsigned(I(b,c,d),x),ac))

  a=RotateLeft(a,s)

  a=AddUnsigned(a,b)

End Sub


Private Function ConvertToWordArray(sMessage)

  Dim lMessageLength

  Dim lNumberOfWords

  Dim lWordArray()

  Dim lBytePosition

  Dim lByteCount

  Dim lWordCount

  Dim lByteValue	' need these variables to handle byte value and input argument type

  Dim lMessageType


  Const MODULUS_BITS=512

  Const CONGRUENT_BITS=448


  lMessageType=Vartype(sMessage)

  Select Case lMessageType	' strings or Variant Byte Arrays: nothing else!

	Case 8	: lMessageLength=Len(sMessage)

	Case 8209 : lMessageLength=LenB(sMessage)

	Case Else Err.Raise -1,"MD5","Unknown Type passed to MD5 function"

  End Select


  lNumberOfWords=(((lMessageLength+((MODULUS_BITS-CONGRUENT_BITS)\BITS_TO_A_BYTE))\(MODULUS_BITS\BITS_TO_A_BYTE))+1)*(MODULUS_BITS\BITS_TO_A_WORD)

  ReDim lWordArray(lNumberOfWords-1)


  lBytePosition=0

  lByteCount=0

  Do Until lByteCount >=lMessageLength

	lWordCount=lByteCount\BYTES_TO_A_WORD

	lBytePosition=(lByteCount Mod BYTES_TO_A_WORD)*BITS_TO_A_BYTE

	Select Case lMessageType	' get the next byte value

	  Case 8	: lByteValue = Asc (Mid (sMessage,lByteCount+1,1))

	  Case 8209 : lByteValue = AscB(MidB(sMessage,lByteCount+1,1))

	End Select

	lWordArray(lWordCount)=lWordArray(lWordCount) Or LShift(lByteValue,lBytePosition)

	lByteCount=lByteCount+1

  Loop


  lWordCount=lByteCount\BYTES_TO_A_WORD

  lBytePosition=(lByteCount Mod BYTES_TO_A_WORD)*BITS_TO_A_BYTE


  lWordArray(lWordCount)=lWordArray(lWordCount) Or LShift(&H80,lBytePosition)


  lWordArray(lNumberOfWords-2)=LShift(lMessageLength,3)

  lWordArray(lNumberOfWords-1)=RShift(lMessageLength,29)


  ConvertToWordArray=lWordArray

End Function


Private Function WordToHex(lValue)

  Dim lByte

  Dim lCount


  For lCount=0 To 3

	lByte=RShift(lValue,lCount*BITS_TO_A_BYTE) And m_lOnBits(BITS_TO_A_BYTE-1)

	WordToHex=WordToHex & Right("0" & Hex(lByte),2)

  Next

End Function


Public Function MD5(sMessage)

  Dim x

  Dim k

  Dim AA

  Dim BB

  Dim CC

  Dim DD

  Dim a

  Dim b

  Dim c

  Dim d


  Const S11=7

  Const S12=12

  Const S13=17

  Const S14=22

  Const S21=5

  Const S22=9

  Const S23=14

  Const S24=20

  Const S31=4

  Const S32=11

  Const S33=16

  Const S34=23

  Const S41=6

  Const S42=10

  Const S43=15

  Const S44=21


  x=ConvertToWordArray(sMessage)


  a=&H67452301

  b=&HEFCDAB89

  c=&H98BADCFE

  d=&H10325476


  For k=0 To UBound(x) Step 16

	AA=a

	BB=b

	CC=c

	DD=d


	FF a,b,c,d,x(k+0),S11,&HD76AA478

	FF d,a,b,c,x(k+1),S12,&HE8C7B756

	FF c,d,a,b,x(k+2),S13,&H242070DB

	FF b,c,d,a,x(k+3),S14,&HC1BDCEEE

	FF a,b,c,d,x(k+4),S11,&HF57C0FAF

	FF d,a,b,c,x(k+5),S12,&H4787C62A

	FF c,d,a,b,x(k+6),S13,&HA8304613

	FF b,c,d,a,x(k+7),S14,&HFD469501

	FF a,b,c,d,x(k+8),S11,&H698098D8

	FF d,a,b,c,x(k+9),S12,&H8B44F7AF

	FF c,d,a,b,x(k+10),S13,&HFFFF5BB1

	FF b,c,d,a,x(k+11),S14,&H895CD7BE

	FF a,b,c,d,x(k+12),S11,&H6B901122

	FF d,a,b,c,x(k+13),S12,&HFD987193

	FF c,d,a,b,x(k+14),S13,&HA679438E

	FF b,c,d,a,x(k+15),S14,&H49B40821


	GG a,b,c,d,x(k+1),S21,&HF61E2562

	GG d,a,b,c,x(k+6),S22,&HC040B340

	GG c,d,a,b,x(k+11),S23,&H265E5A51

	GG b,c,d,a,x(k+0),S24,&HE9B6C7AA

	GG a,b,c,d,x(k+5),S21,&HD62F105D

	GG d,a,b,c,x(k+10),S22,&H2441453

	GG c,d,a,b,x(k+15),S23,&HD8A1E681

	GG b,c,d,a,x(k+4),S24,&HE7D3FBC8

	GG a,b,c,d,x(k+9),S21,&H21E1CDE6

	GG d,a,b,c,x(k+14),S22,&HC33707D6

	GG c,d,a,b,x(k+3),S23,&HF4D50D87

	GG b,c,d,a,x(k+8),S24,&H455A14ED

	GG a,b,c,d,x(k+13),S21,&HA9E3E905

	GG d,a,b,c,x(k+2),S22,&HFCEFA3F8

	GG c,d,a,b,x(k+7),S23,&H676F02D9

	GG b,c,d,a,x(k+12),S24,&H8D2A4C8A


	HH a,b,c,d,x(k+5),S31,&HFFFA3942

	HH d,a,b,c,x(k+8),S32,&H8771F681

	HH c,d,a,b,x(k+11),S33,&H6D9D6122

	HH b,c,d,a,x(k+14),S34,&HFDE5380C

	HH a,b,c,d,x(k+1),S31,&HA4BEEA44

	HH d,a,b,c,x(k+4),S32,&H4BDECFA9

	HH c,d,a,b,x(k+7),S33,&HF6BB4B60

	HH b,c,d,a,x(k+10),S34,&HBEBFBC70

	HH a,b,c,d,x(k+13),S31,&H289B7EC6

	HH d,a,b,c,x(k+0),S32,&HEAA127FA

	HH c,d,a,b,x(k+3),S33,&HD4EF3085

	HH b,c,d,a,x(k+6),S34,&H4881D05

	HH a,b,c,d,x(k+9),S31,&HD9D4D039

	HH d,a,b,c,x(k+12),S32,&HE6DB99E5

	HH c,d,a,b,x(k+15),S33,&H1FA27CF8

	HH b,c,d,a,x(k+2),S34,&HC4AC5665


	II a,b,c,d,x(k+0),S41,&HF4292244

	II d,a,b,c,x(k+7),S42,&H432AFF97

	II c,d,a,b,x(k+14),S43,&HAB9423A7

	II b,c,d,a,x(k+5),S44,&HFC93A039

	II a,b,c,d,x(k+12),S41,&H655B59C3

	II d,a,b,c,x(k+3),S42,&H8F0CCC92

	II c,d,a,b,x(k+10),S43,&HFFEFF47D

	II b,c,d,a,x(k+1),S44,&H85845DD1

	II a,b,c,d,x(k+8),S41,&H6FA87E4F

	II d,a,b,c,x(k+15),S42,&HFE2CE6E0

	II c,d,a,b,x(k+6),S43,&HA3014314

	II b,c,d,a,x(k+13),S44,&H4E0811A1

	II a,b,c,d,x(k+4),S41,&HF7537E82

	II d,a,b,c,x(k+11),S42,&HBD3AF235

	II c,d,a,b,x(k+2),S43,&H2AD7D2BB

	II b,c,d,a,x(k+9),S44,&HEB86D391


	a=AddUnsigned(a,AA)

	b=AddUnsigned(b,BB)

	c=AddUnsigned(c,CC)

	d=AddUnsigned(d,DD)

  Next


  MD5=LCase(WordToHex(a) & WordToHex(b) & WordToHex(c) & WordToHex(d))

End Function

</script>

По второй ссылке (aspx) скачиваются два файла: 1-banner.aspx 2-xap.aspx.cs 1-banner.aspx содержит код:

<%@ Page Language="C#" AutoEventWireup="true"  CodeFile="xap.aspx.cs" Inherits="_Default" Debug="false" %>

<%Banners(); %>

2-xap.aspx.cs содержит код:

using System;

using System.Data;

using System.Configuration;

using System.Web;

using System.Web.Security;

using System.Web.UI;

using System.Web.UI.WebControls;

using System.Web.UI.WebControls.WebParts;

using System.Web.UI.HtmlControls;

using System.Security.Cryptography;

using System.Net;

using System.Net.Sockets;


public partial class _Default : System.Web.UI.Page 

{

	protected void Page_Load(object sender, EventArgs e)

	{


	}


	public void Banners()

	{

		string login = "your_login", ru, file, path_code, user_pref, path, domain, site = Request.ServerVariables["HTTP_HOST"], abuff = "";

		byte[] buffer=new byte[4096];

		MD5CryptoServiceProvider md5 = new MD5CryptoServiceProvider();


		ru = Request.Path.ToString();

		ru = ru.Substring(0, ru.LastIndexOf("/")+1);

		if (ru.Length == 0)ru = "/";

		if (ru.Length <= 180)

		{

			file = Convert.ToBase64String(System.Text.Encoding.UTF8.GetBytes(ru));

			if (site.IndexOf("www.") == 0) site = site.Substring(4);

			path_code = GetHexString(md5.ComputeHash(System.Text.Encoding.UTF8.GetBytes(file)));

			path_code = path_code.ToLower();

			user_pref = login.Substring(0, 2);

			path = path_code.Substring(0, 1) + "/" + path_code.Substring(1, 2)+"/";

			domain = login + ".tnx.net";

			path = "/users/" + user_pref + "/" + login + "/" + site + "/" + path + file + ".txt";

			Socket sock1 = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);

			sock1.ReceiveBufferSize = 4096;

			sock1.SendTimeout = 10000;			//500 - recommended

			sock1.ReceiveTimeout = 10000;		//500 - recommended

			try

			{

				sock1.Connect(Dns.GetHostAddresses(domain), 80);

				if (sock1.Connected)

				{

					sock1.Send(System.Text.Encoding.ASCII.GetBytes("GET " + path + " HTTP/1.0\r\nUser-Agent: XAPBannerDownloader v0.1a\r\n\r\n"));

					while (true)

					{

						int i = sock1.Receive(buffer);

						if (i <= 0) break;

						abuff += System.Text.Encoding.Default.GetString(buffer, 0, i);

					}

				}

				sock1.Shutdown(SocketShutdown.Both);

				int j = abuff.IndexOf("\r\n\r\n");

				int k = abuff.IndexOf("\r\n");

				if (abuff.Substring(0, k) == "HTTP/1.1 200 OK")

				{

					Response.Write(abuff.Substring(j + 4));

				}

				else

				{

					Response.Write("Error!<br>" + abuff.Substring(0, k));

				}

			}

			catch (Exception e)

			{

				Response.Write("Error: <b><font color=red>"+e.Message+"</font></b>");

			}

		}

	}

	private string GetHexString(byte[] b)

	{

		string tret="",str="";

		for (int i = 0; i < b.Length; ++i)

		{

			str = b[i].ToString("X");

			if (str.Length < 2)tret+="0";

			tret+=str;

		}

		return tret;

	}

}

Подскажите пожалуйста что мне со всем этим делать, что куда вставлять чтобы выводились КСАПовские ссылки?

При необходимости, оплачу положительный результат в разумной сумме.

Спасибо.

Изменено 4 июня 2008 пользователем Langly

romen · 4 июня 2008

что делать что делать - переписать на php /

а вообще там написано : Простая установка php, perl или asp-кода способом "copy-paste". -так что если это не так - есть что предъявить админам

Langly · 4 июня 2008

что делать что делать - переписать на php /
а вообще там написано : Простая установка php, perl или asp-кода способом "copy-paste". -так что если это не так - есть что предъявить админам

Зачем переписывать на PHP???

Мне нужна Ява.

Прошу помочь разобраться что с этим всем делать.

IT-Security · 5 июня 2008

Это не ява, а ASP и никакого отношения к движку не имеет.

Дружить между собой ASP и PHP - ещё тот изврат + нужен хостинг, который ASP поддерживает.

celsoft · 5 июня 2008

+ нужен хостинг, который ASP поддерживает.

точнее сказать нужен Windows хостинг с поддержкой ASP

Langly · 5 июня 2008

Ничерта я так и не понял...

_________________________________________________________________________

Наверное я что-то не так изложил. Давайте все с начала.

XAP.RU - система покупки-продажи ссылок типа SAPE.RU

Они дают PHP-код, который так-же как саповский вставляется в страницы и выводит ссылки.

Он у меня есть и стоит на основном сайте, все работает.

Но у меня есть два поддомена - это партнерские многостраничные сайты.

http://game.endem.ru/

http://love.endem.ru/

У меня есть доступ через админку партнерки к вставке в страницы этих сайтов кодов банеров, ссылок итд.

Я хочу вставить в них код КСАПа. Но техподдержка этих партнерских сайтов ответила, что PHP-код туда вставить нельзя, не поддерживается и работать не будет. Поддерживается Ява-код.

Я обратился в техподдержку КСАПа и попросил Ява-код для вставки и вывода ссылок. Они мне дали вот это - вышеприведенное. И заморозились. Я от них добиться ничего не могу. Поэтому я и спрашиваю, что мне с этим делать? Куда что вставить чтобы работал вывод ссылок?

Подскажите пожалуйста!

Пропадает очень много проиндексированных страниц, хотелось бы чтобы они приносили пользу.

Если необходимо оплатить ваше время, потраченное на все это, я готов это обсудить.

Главное вставить код и чтобы все работало, то есть выводились ссылки на страницах этих поддоменов.

PS А что такое ASP...итд итп - я понятия не имею. Ситуация аналогична той, что купив телевизор, я спрашиваю "Как его включить?"

Нужно просто сказать:"Сунь вилку в розетку и нажми кнопку!" :rolleyes:

Больше ничего! :-)) Я не хочу изучать радиоэлектронику для того, чтобы включить телевизор :-)))

Изменено 5 июня 2008 пользователем Langly

lifestar · 5 июня 2008

я тут JAVA вообще не вижу

Langly · 5 июня 2008

Ну эту хренотень мне дала техподдержка ксапа на просьбу предоставить Ява код...

А нельзя просто написать на яве то, что у них написано на PHP?

celsoft · 5 июня 2008

А нельзя просто написать на яве то, что у них написано на PHP?

нет это разные языки програмирования предназначенные для абсолютно разных целей, и выполняются в разных местах

PS А что такое ASP...итд итп - я понятия не имею.

это язык програмирования, такой же как PHP, только другой язык програмирования. Если ваша партнерка не поддерживает PHP, то ASP я думаю они точно не поддерживают.

Я хочу вставить в них код КСАПа. Но техподдержка этих партнерских сайтов ответила, что PHP-код туда вставить нельзя, не поддерживается и работать не будет. Поддерживается Ява-код.

Думаю у вас не получится ничего вставить, для работы КСАПа нужна поддержка серверного языка (PHP, ASP) а ваша партерка поддерживает только браузерный язык (JavaScript)

Al-x · 5 июня 2008

на просьбу предоставить Ява код...

ну пока вы в нём разберётесь, они смогут спокойно отдохнуть))

Изменено 5 июня 2008 пользователем Al-x

Langly · 6 июня 2008

на просьбу предоставить Ява код...

ну пока вы в нём разберётесь, они смогут спокойно отдохнуть))

Мда...

Чем они и занимаются по жизни...

Войти

Кто разбирается в Java

Рекомендованные сообщения

Langly 7

Ссылка на сообщение

Поделиться на других сайтах

romen 1

Ссылка на сообщение

Поделиться на других сайтах

Langly 7

Ссылка на сообщение

Поделиться на других сайтах

IT-Security 33

Ссылка на сообщение

Поделиться на других сайтах

celsoft 6 007

Ссылка на сообщение

Поделиться на других сайтах

Langly 7

Ссылка на сообщение

Поделиться на других сайтах

lifestar 18

Ссылка на сообщение

Поделиться на других сайтах

Langly 7

Ссылка на сообщение

Поделиться на других сайтах

celsoft 6 007

Ссылка на сообщение

Поделиться на других сайтах

Al-x 7

Ссылка на сообщение

Поделиться на других сайтах

Langly 7

Ссылка на сообщение

Поделиться на других сайтах

Присоединяйтесь к обсуждению

Форум

Активность