|
Data is crowd sourced! In this kind of websites, we can just make sure that we plead the crowd (by putting a line of text) that it has to be valid and believe them if they ever put it.
But if they ever put it, this can be a valuable information that can help others. Right?
|
|
|
|
|
I would never trust data that people had entered at random, with no incentive as being accurate, or as representative of the real spread of people who had the disease. You will not get a statistically valid number of people entering data.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
You are right, the data may not be trustworthy. But so is wikipedia, tripadvisor or any other crowd-sourcing websites, right? Even their website disclaimer warns about it. But the data is still useful for many.
modified on Tuesday, October 6, 2009 7:24 PM
|
|
|
|
|
Collecting data like wikipedia, which is a collection of facts, is something that is self correcting. Someone else sees something is wrong, and fixes it. Collecting statistics does not work that way.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
I agree. That is the reason I am debating whether to do it or not.
|
|
|
|
|
I'd go with 'no'. I don't see how it would be useful, I am afraid.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
People who need to know this already have access to this sort of information, based on reliable sources from doctors, hospitals and so on. There are also some sites which make this sort of information available to the general public, e.g. Health Map.[^]
A site that was updated by any member of the public as and when they feel like it would not be that reliable. When you looked at the number of cases of a disease in a particular area it would only tell you how many people have posted an entry in that area, not how many cases there actually were. For example, areas in which people have a lower level of income tend to have relatively limited access to computers and the internet, and consequently your site would likely under-represent the incidence of disease in poorer areas.
Also, self-diagnosis is unreliable and so you would have no idea what proportion of the entries posted on your site were accurate or even genuine. If these people have been diagnosed by a doctor then this information will already have been recorded elsewhere by someone who knows what they are doing.
|
|
|
|
|
hello there -
I would like to make the button text or the button background flashing. anyone to help me with some advice for that?
thanks in advance, Laziale
|
|
|
|
|
You would use javascript to change the color, or use an animated gif. This was discussed at length yesterday in the ASP.NET forum.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
What is website prototype ? and how can it help us ?
|
|
|
|
|
A prototype basically looks like the program, but doesn't really work. It's useful for working out UI issues and getting clients to accept a design.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
Dear All
Im very new in software development…. I don’t have the basic concept on the standard process to prepare the SDLC, SRS etc…. I need your help…
Regards
Zaman
|
|
|
|
|
SweetHomeBD wrote: Im very new in software development…
How new is new ? In what context are you writing code ? What are you trying to achieve ?
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
You need our help, but you don't answer when people try to help you ?
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
Well, I guess this means that you didn't really want our help.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
hi,
I need some help, at least some guidelines where to start. Briefly, I am making a website where registered users will be able to upload their photos, create an album and some other functionality. Im new with PHP and mySQL, so have no clue where to start. Is the files would be stored in database together with other information with users details when they register, or it is some kind dedicated server part that only users can access?
the thing im making is like a part of facebook or any other social websites where u can upload a bunch o photos, put them together into album...plus you can comment on others etc..
Thank You for any suggestions.
|
|
|
|
|
If you're really new, why not use ASP.NET instead ? The tools are free, and the language and framework are much richer and more user friendly.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
|
|
thanks for help, but you missunderstood me a bit...
xamp didnt wor for some reason, thus I found cheap host and got everything online. For code editing and web development Im using Dreamweaver (older, still Macromedia but I think it is basicaly the same). For php I already read loads of tutorials, and probably will be fine with upload part. what I dont know is how to setup mySQL database that it could store physical files (images in my case) or it is done in some other way? any suggestions on that part?
thanx once more
|
|
|
|
|
You need to use PHPMyAdmin or get remote access credentials and use something like Navicat SQL. You shouldn't store the files in the database but store the path to the files on the server and then upload them into a non-accessible folder.
Database Fields:
id,
Name,
Path.
Then you can create a file which reads from the path and outputs the file when needed. So all in all there's a lot of testing to be done. So, I suggest trying to install XAMPP on your PC again - it really is worth it for testing. Use default settings and it should work. Then go to http://localhost/[^]
|
|
|
|
|
Hi Guys,
How am I be able to generate a 100,000 MySpace IDs? I am using VB.Net and MSACCESS as my local database where I suppose to save the 100,000 MySpace IDs, but I don't know how to do it.
Please help.
Thank you
hifiger2004
|
|
|
|
|
I can't imagine a non evil reason for you to want to do this.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
Hi Christ,
I was able to create a script on this using the concept of test software, but as I tested it, you've helped me realize that the client I'm having now, who really wanted this to be done, I think, might have some bad motives. Well, since it's only a very short hour project, I immediately terminate the contract.
Thanks man.
Hifiger
hifiger2004
|
|
|
|
|
Hi , I'd appreciate to get help on that. I can't seem to have my notify mail sent after my user registrated. Weird enough, the process it just fine since I can see the new user info in my access database... I just don't get why the email is not sent. Syntax error? It's not complicated, User subscribes which in this case is called action = 1....
Thanks in advance..!!!
<!--METADATA TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library" -->
<!--METADATA TYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library" -->
<%
Dim action
action = Request.QueryString("action")
If action = 1 Then
Dim objConnection, objRecordset, SQLs, strUserID
Dim strPassword, strFname, strLname, strAddress, strCity, strCountry
Dim strZip, strUserType, strJoinDate, strEducation, strNewsletter, strEmail, strCareer,strUnion,strMalefemale,strExperience
Set objConnection = Server.CreateObject("ADODB.Connection")
Set objRecordset = Server.CreateObject("ADODB.Recordset")
objConnection.Open Application("ConnectionString")
strUserType= 0
strFname=Replace(Request.Form("firstname"), "'", "''")
strLname=Replace(Request.Form("lastname"), "'", "''")
strAddress=(Request.Form("address"))
strCity=(Request.Form("city"))
strZip=(Request.Form("zip"))
strCountry=(Request.Form("country"))
strEmail=(Request.Form("emailaddress"))
strPassword=(Request.Form("password"))
strCareer=(Request.Form("careerlevel"))
strEducation=(Request.Form("education"))
strJoinDate=(Request.Form("joindate"))
strNewsletter=(CInt(Request.Form("newsletter")))
strUnion = (Request.Form("Union"))
strMalefemale = (Request.Form("malefemale"))
strExperience = (Request.Form("experience"))
If strNewsletter <> 1 Then
strNewletter = 0
End If
' ## ERROR CONTROL ##
objConnection.Errors.Clear ' just to be safe, clear out any existing errors
'On Error Resume Next ' then IGNORE errors!
' Put parameters in registration database.
SQLs = "INSERT INTO Users (Email, Fname, Lname, UsrPassword, Address, City, Country, Zip, " & _
"CareerLevel, Education, JoinDate, Newsletter, UserType) "
SQLs = SQLs & "VALUES ("
SQLs = SQLs & "'" & strEmail & "',"
SQLs = SQLs & " '" & strFname & "',"
SQLs = SQLs & " '" & strLname & "',"
SQLs = SQLs & " '" & strPassword & "',"
SQLs = SQLs & " '" & strAddress & "',"
SQLs = SQLs & " '" & strCity & "',"
SQLs = SQLs & " " & strCountry & ","
SQLs = SQLs & " '" & strZip & "',"
SQLs = SQLs & " '" & strCareer & "',"
SQLs = SQLs & " '" & strEducation & "',"
SQLs = SQLs & " '" & strJoinDate & "',"
SQLs = SQLs & " '" & strNewsletter & "',"
SQLs = SQLs & " " & strUserType & ")"
'Response.write SQLs
'Response.end
Application.Lock
objConnection.Execute(SQLs)
Application.Unlock
' ## ERROR CONTROL ##
'On Error GoTo 0 ' turn off the ignoring of errors!
' now see if we got any errors from the insert!
For Each oops In objConnection.Errors
If oops.number = -2147217900 Then
'If oops.number = -2147467259 Then
Session("Session_Message") = "The email address you entered already exists. <br />" & _
"<a href=""../forgotpass.asp"">Forgot password? Click here</a>"
Response.Write "That item already exists in that table!<BR>"
'Create the Query String
Dim strQueryString
strQueryString = "?firstname=" & strFname & "&lastname=" & strLname & "&address=" & strAddress & _
"&city=" & strCity & "&zip=" & strZip & "&emailaddress=" & strEmail
Response.Redirect("../candidate/contactinfo.asp" & strQueryString)
Response.End()
Else
Response.Write "Unexpected error: " & oops.number & " -- " & oops.description
Response.End()
End If
'Next
' The following assigns the new UserID to strUserID
Set objRecordset = objConnection.Execute("SELECT @@IDENTITY") ' Create a recordset and_
' SELECT the new Identity
strUserID = objRecordset(0) ' Store the value of the new identity in variable strUserID
Session("User_ID") = objRecordset("UserID")
Session("User_Type") = objRecordset("UserType")
Session("User_Name") = objRecordset("Fname") & " " & objRecordset("Lname")
Session("UserLoggedIn") = true
Session("User_ID") = strUserID
Session("Login_Name") = ""
objConnection.Close
Set objRecordset = Nothing
LoginUser (strUserID)
Session("Session_Message") = "Welcome " & Session("User_Name")
Session("paid") = 0
'Envoyons un courriel/Let's send the email
dim htmlmessage
dim strSiteURL
strSiteURL = "http://www.mywebsiteurl.com/"
htmlmessage = "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.01 Transitional//EN"">"
htmlmessage = htmlmessage & "<html><head><title>"
htmlmessage = htmlmessage & "Nouveau candidat</title>"
htmlmessage = htmlmessage & "<style type=""text/css"">"
htmlmessage = htmlmessage & "<!--"
htmlmessage = htmlmessage & "Body {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px}"
htmlmessage = htmlmessage & "TD {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px}"
htmlmessage = htmlmessage & "-->"
htmlmessage = htmlmessage & "</style>"
htmlmessage = htmlmessage & "<META HTTP-EQUIV=""Content-Type"" Content=""text-html; charset=Windows-1252"">"
htmlmessage = htmlmessage & "</head>"
htmlmessage = htmlmessage & "<body topmargin=""5"" leftmargin=""5"" bgcolor=""#FFFFFF"" text=""#000000"">"
htmlmessage = htmlmessage & "<b>mywebsiteurl.com</b><hr>"
htmlmessage = htmlmessage & "Welcome to mywebsiteurl.com. Your new account is setup.<hr>"
htmlmessage = htmlmessage & "<table width=""50%"" border=""0"" cellspacing=""0"" cellpadding=""1"">"
htmlmessage = htmlmessage & "<tr>"
htmlmessage = htmlmessage & "<td><b>Email Address: </b>" & strEmail &"</td>"
htmlmessage = htmlmessage & "</tr>"
htmlmessage = htmlmessage & "<tr>"
htmlmessage = htmlmessage & "<td><b>Your Password: </b>"& strPassword &"</td>"
htmlmessage = htmlmessage & "</tr></table>"
htmlmessage = htmlmessage & "<P><a href=""http://" & strSiteURL & """>" & strSiteURL & "</a></P>"
htmlmessage = htmlmessage & "</body></html>"
CDOSendEmail2 htmlmessage, strEmail
Response.Redirect("http://mywebsiteurl/checkemail.html")
If Session("UserLoggedIn") = true Then
Response.Redirect("../candidate/default.asp")
End If
Next
Else If action = 2 Then
Dim strSQL
Set objConnection = Server.CreateObject("ADODB.Connection")
Set objRecordset = Server.CreateObject("ADODB.Recordset")
objConnection.Open Application("ConnectionString")
strSQL = "UPDATE Users SET " & _
"Fname = '" & Replace(Request.Form("firstname"), "'", "''") & "', " & _
"Lname = '" & Replace(Request.Form("lastname"), "'", "''") & "', " & _
"Address = '" & Replace(Request.Form("address"), "'", "''") & "', " & _
"City = '" & Replace(Request.Form("city"), "'", "''") & "', " & _
"Zip = '" & Replace(Request.Form("zip"), "'", "''") & "', " & _
"Country = '" & Replace(Request.Form("country"), "'", "''") & "', " & _
"UsrPassword = '" & Replace(Request.Form("password"), "'", "''") & "', " & _
"CareerLevel = '" & Replace(Request.Form("careerlevel"), "'", "''") & "', " & _
"unionaff = '" & Replace(Request.Form("union"), "'", "''") & "', " & _
"malefemale = '" & Replace(Request.Form("malefemale"), "'", "''") & "', " & _
"experience = '" & Replace(Request.Form("experience"), "'", "''") & "', " & _
"NewsLetter = '" & Cint(Request.Form("newsletter")) & "' " & _
"WHERE UserID = " & session("User_ID") & ""
'Response.write strSQL
'Response.end
' Use the execute method of the connection object the insert the record
objConnection.execute(strSQL)
objConnection.close
set objConnection = nothing
' Confirmation message
Session("Session_Message") = Replace(Session("User_Name"), "''", "'") & " your personal information has been updated."
Response.Redirect "../candidate/default.asp"
END IF
Sub LoginUser (strUserID)
Dim objConnection, objRecordset, SQLs
Set objConnection = Server.CreateObject("ADODB.Connection")
Set objRecordset = Server.CreateObject("ADODB.Recordset")
objConnection.Open Application("ConnectionString")
SQLs=""
SQLs= "SELECT UserID, Email, Fname, Lname, UserType FROM Users WHERE UserID = " & strUserID & ""
Set objRecordset=objConnection.Execute(SQLs)
Session("User_ID") = objRecordset("UserID")
Session("User_Type") = objRecordset("UserType")
Session("User_Name") = Replace(objRecordset("Fname"), "''", "'") & " " & Replace(objRecordset("Lname"), "''", "'")
Session("Login_Name") = objRecordset("Email")
Session("UserLoggedIn") = true
objConnection.Close
Set objRecordset = Nothing
End Sub
Sub CDOSendEmail2(MessageBody, SendTo)
Dim NewMail, objConfig, bSuccess, strErr
bSuccess = False
Set NewMail = Server.CreateObject("CDO.Message")
Set objConfig = Server.CreateObject("CDO.Configuration")
Const cdoSendUsingMethod = "http://schemas.microsoft.com/cdo/configuration/sendusing"
Const cdoSMTPServer = "http://schemas.microsoft.com/cdo/configuration/smtpserver"
Const cdoSMTPServerPort = "http://schemas.microsoft.com/cdo/configuration/smtpserverport"
Const cdoSMTPAuthenticate = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"
Const cdoSendUsingPort = 2 'Must use this to use Delivery Notification
Const cdoAnonymous = 0
Const cdoBasic = 1 ' clear text
dim strMailServer
dim strMailServerPort
dim strFromEmail
strMailServer = "relay-hosting.secureserver.net"
strMailServerPort = 25
strFromEmail = "info@mywebsiteurl.com"
'Configuration:
objConfig.Fields(cdoSendUsingMethod) = cdoSendUsingPort
objConfig.Fields(cdoSMTPServer) = strMailServer ' value from DB
objConfig.Fields(cdoSMTPServerPort) = strMailServerPort
objConfig.Fields(cdoSMTPAuthenticate) = cdoAnonymous
'Update configuration
objConfig.Fields.Update
Set NewMail.Configuration = objConfig
NewMail.To = "<" & SendTo & ">" ' value passed from Form
NewMail.From = strFromEmail ' value of From Admin of site from DB
NewMail.Subject = strSubject
NewMail.HTMLBody = MessageBody
On Error Resume Next ' catch errors
NewMail.Send
If Err <> 0 Then ' error occurred
strErr = Err.Description
else
bSuccess = True
End If
if bSuccess = False Then
Response.Write("Error sending mail to " + SendTo + ", message: " + strErr)
Session("Session_Message") = Session("Session_Message") + "<br /> Error sending mail to " + SendTo + ", message: " + strErr + "<br />"
end if
Set NewMail = Nothing
Set objConfig = Nothing
End Sub
End if
%>
La patience est 50% d'un projet web réussi!
|
|
|
|
|