Here are Sandurrs Clan Files if anyone wants emm, they have been modified by me so they work about as well as dPT have them working. Which is pretty good.
DBPT Clan Files
Printable View
Here are Sandurrs Clan Files if anyone wants emm, they have been modified by me so they work about as well as dPT have them working. Which is pretty good.
DBPT Clan Files
bump!!!
sorry for the bump guys,
i got now error 11 now :D
ok, go to your Microsoft IIS manager:
Create all virtual directories for:
Clan
ClanContent
ServerMain
Once all of these have been created do:
right click on your virtual directory
go to ASP.NET tab
make sure that EVERY virtual directory is set up to use ASP.NET V2.057 or watever the version is starting with 2.
Click Apply.
(Do this for all virtual directories)
Go ingame and speak to clan master.
You may get an error 65 but is quite uncommon.
Erm, which Virutal Director do we put the files..under web sites? Or do we create our own? And ow is this possible..Lol IIS isn't my thing =/
IIS Lol?,
@Gzuz, Still Error 11 :(, maybe i have configure wrong SQL.dll maybe,
error 11 is .. claninsert.aspx in clan folder! see it.. r wrong!!! post this file here!
ill make a picture guide later.
here is now my Claninsert.aspx
<%@ Page Language="VB" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
<script runat="server">
Function GetParameter(pName as string, pType as string) as string
dim lTmp as string
lTmp = Page.Request.QueryString.item(pName)
GetParameter = lTmp
End Function
Sub Page_Load(Sender As Object, E As EventArgs)
Dim dbhost, dbuser, dbpass, dbname, userid, gserver, chname, clName, expl, chtype, lv
dbhost = "ROMEO\SQLEXPRESS"
dbuser = "sa"
dbpass = "swaped"
dbname = "ClanDB"
Dim strSplit As String
strSplit = Chr("&H" & "0D")
userid = GetParameter ("userid","String")
gserver = GetParameter ("gserver","String")
chname = GetParameter("chname","String")
clName = GetParameter("clName","String")
chtype = GetParameter("chtype","String")
lv = GetParameter("lv","String")
expl = "82.41.94.2"
if userid="" Or gserver="" Or chname="" Or clName="" Or chtype="" or lv="" Then
Response.Write("Code=100" & strSplit)
Response.End
End if
Dim objConn, objReader, objCommand, objQuery
Dim connectionString As String = "server='" & dbhost & "'; user id='" & dbuser & "'; password='" & dbpass & "'; database='" & dbname & "'"
objConn = New SqlConnection(connectionString)
objConn.Open()
objQuery = "SELECT ClanName FROM UL WHERE ChName='" & chname & "'"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
If objReader.Read()
If objReader.Item(0) = "" Then
objReader.Close()
objQuery = "DELETE FROM UL WHERE ChName='" & chname & "'"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
Else
objReader.Close()
objConn.Close()
Response.Write("Code=2" & strSplit & "CMoney=0" & strSplit)
Response.End
End if
End if
objReader.Close()
objQuery = "SELECT ClanZang FROM CL WHERE ClanName='" & clName & "'"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
If objReader.Read()
objReader.Close()
objConn.Close()
Response.Write("Code=3" & strSplit & "CMoney=0" & strSplit)
Response.End
End if
objReader.Close()
objQuery = "SELECT IMG FROM LI WHERE ID=1"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
Dim iIMG As Integer
if objReader.Read() Then
iIMG = objReader.Item(0)
Else
iIMG = 1000000000
objReader.Close()
objQuery = "INSERT INTO LI values('" & (iIMG + 1) & "','1')"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
End if
objReader.Close()
iIMG = iIMG + 1
objQuery = "UPDATE LI SET IMG='" & iIMG & "' WHERE ID=1"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
objReader.Close()
objQuery = "INSERT INTO CL ([ClanName],[UserID],[ClanZang],[MemCnt],[Note],[MIconCnt],[RegiDate],[LimitDate],[DelActive],[PFlag],[KFlag],[Flag],[NoteCnt],[Cpoint],[CWin],[CFail],[ClanMoney],[CNFlag],[SiegeMoney]) values('" & clName & "','" & userid & "','" & chname & "','1','" & expl & "','" & iIMG & "',getdate(),getdate()+3600,'0','0','0','0','1 ','0 ','0','0','0','0','0')"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
objReader.Close()
objQuery = "SELECT IDX FROM CL WHERE ClanName='" & clName & "'"
objCommand = New SqlCommand(objQuery, objConn)
Dim IDX As String
objReader = objCommand.ExecuteReader()
If objReader.Read() Then
IDX = objReader.Item(0)
End If
objReader.Close()
objQuery = "INSERT INTO UL ([IDX],[userid],[ChName],[ClanName],[ChType],[ChLv],[Permi],[JoinDate],[DelActive],[PFlag],[KFlag],[MIconCnt]) values('" & IDX & "','" & userid & "','" & chname & "','" & clName & "','" & chtype & "','" & lv & "','0',getdate(),'0','0','0','" & iIMG & "')"
objCommand = New SqlCommand(objQuery, objConn)
objReader = objCommand.ExecuteReader()
objReader.Close()
objConn.Close()
Response.Write("Code=1" & strSplit & "CMoney=500000" & strSplit)
End Sub
</script>
<html>
<head>
</head>
<body>
</body>
</html>
easy =p
is claninsert.aspx =p
man.... don't use this fucking shit ! of SA user... mane a new =p put permisions and use it !!! some like
id: master
pw : master
or
id : clan
pw : clan
don't make
id : 218ucnd1dhn
pw : 2108@@!#@32ud
this shit only "fuc*" u!!!
FOR FIX! use another user not SA!!!
bump2x, hello gzuz
we are still waiting for your Video :D:drinks_no
sorry everyone, i have been busy working with other matters. the picture guide is almost done, will be posted tomorrow. That claninsert.aspx is perfect and works EVERY time for me, not even error 65. The problem usually occurs when asp.net is not set to 2.0 for aspx files. Use ethereal(wireshark) if you get an internal server error 500 then you have a problem with your asp.net config in your iis.
Check:
Clan
ServerMain
ClanContent
Make sure that you have set up your ports correctly for tcp/ip
Also, SA is the most openly accessible login point to SQL server, it is an administrative account
Although, i do use ClanUser for ClanInsert as there is alot of dataflow into the SA account and i suppose there could be skew with a high data demanding server.
ok nice, if you post that guide gzuz, you'll get credits to everyone :)
ok back to the point, my ASP NET version is, 2.0.50727
hmm... :D
ok nice, if you post that guide gzuz, you'll get credits to everyone :)
ok back to the point, my ASP NET version is, 2.0.50727
hmm... :D
ok now i fixed it, error 11, :D
theres something 1 file missing in your Clan Files :D
hahaha, i know it :D
ok now but still i got error in Upload can icon :D
ok now FIXED!!!!
SEXY!!!!
:D